下面的代码只能搜索配货的记录；
能不能同时搜索订单表里的内容
这样
搜索的时候
既能在窗口里面显示配货记录，也能同时显示该订单的详细信息
请问该怎么改呢
Dim tbx As winform.textbox = e.Form.controls("txtfind")
Dim chk As winform.checkbox = e.Form.controls("chkfindmode")
Dim str As String = tbx.value
Dim dr As DataRow
If chk.checked Then
dr = DataTables("配货").find("原始单号 like '%" & str & "%'")
Else
dr = DataTables("配货").find("原始单号 = '" & str & "'")
End If
If dr IsNot Nothing Then
Dim idx As Integer = Tables("配货").findrow(dr)
If idx >= 0 Then
Tables("配货").position = idx
Else
messagebox.show("无法搜索到任何结果,请检查搜索条件!","提示",messageboxbuttons.ok,messageboxicon.information)
End If
Else
messagebox.show("无法搜索到任何结果,请检查搜索条件!","提示",messageboxbuttons.ok,messageboxicon.information)
End If
加好友 
发短信
Post By：2018/4/13 12:29:00 [只看该作者]
