自定义录入界面之二,我不想从文本框TextBox1取条件,希望在Table2中当前行的指定单元格中取值,下列代码怎么写?
Dim txt As String = Tables("窗口1_Table2").Row("雇员ID")
Dim tbl As Table = Tables("窗口1_Table1")
If txt = "" Then
tbl.Filter = ""
Else
txt = "'%" & txt & "%'"
tbl.Filter = "客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt
End If
如果这样,还不如用回自定义录入界面之三
Dim txt As String = Tables("窗口1_Table2").current("雇员ID")
Dim tbl As Table = Tables("窗口1_Table1")