主题：临时表用find找到的行怎么定位

Dim cmd As New SQLCommand

Dim dt As DataTable

cmd.C

cmd.CommandText = "S  ELECT * From {订单}”

dt = cmd.ExecuteReader

Dim po As Integer

dr = dt.Find("产品 = 'PD01'","日期 Desc") '找出最后一次订购PD01产品的DataRow

po = Tables("订单").FindRow(dr)'找出该DataRow在Table中的位置

If po >= 0 Then '如果找到

    Tables("订单").Position = po '选定

End If

老师，临时表找到符合条件的行后，定位到找到的行，tables("订单")这个该怎么写？？？