我要在出单单号的textbox里输入“进出单表”中“进单单号”的任一个,然后定位到该行。
我是在textbox的Enter下面写下面的代码,但是不能用。
Dim dr As DataRowdr = DataTables("进出单表").Find("[进单单号] = '%" "%' ")If dr IsNot Nothing Then Dim wz As Integer = Tables("进出单表").FindRow(dr) If wz >= 0 Then Tables("订单").Position = wz End IfEnd If
此主题相关图片如下:22.png