dataset con select inner join

Buenos días.

Sigo peleandome con ADO.net en mi primera aplicación VB.net y necesitaria
algo de ayuda. Aquí os dejo mi codigo con la línea donde tengo el error
comentada.

sSQL2 = "select SPA2003F.SPRS.* ,SPA2003F.SPPR.PRDESC from SPA2003F.SPRS
inner join SPA2003F.SPPR ON SPA2003F.SPRS.RSTRAT = SPA2003F.SPPR.PRARTI AND
SPA2003F.SPRS.RSCENT = SPA2003F.SPPR.PRCENT where RSFECH =" &
Format(Me.DateTimePicker1.Value, "yyMMdd")

mySqlDataAdapter2 = New iDB2DataAdapter(sSQL2, myConnection) 'SPA2003F.

mySqlDataAdapter2.Fill(myDataSet2, sSQL2)

myDataTable2 = New DataTable

mySqlDataAdapter2.Fill(myDataTable2)


MsgBox (myDataTable2.Rows(n)("RSNOMB").ToString)

MsgBox (myDataTable2.Rows(n)("PRDESC").ToString) ''' Aquí me da un error de
excepción, que estoy haciendo mal?¿



Saludos y gracias.