以下代码是窗口的两表的查询textbox1 valuechanged事件中的代码 table1和 table2 是normal 类型报表,为什么查询中时只显示10行数据,怎么修改
Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl1 As Table = Tables("银行查询_Table1")
Dim tbl2 As Table = Tables("银行查询_Table2")
If txt = "" Then
tbl1.Filter = ""
tbl2.Filter = ""
Else
txt = "'%" & txt & "%'"
tbl1.DataTable.loadFilter = "交易账号 Like " & txt & " Or 交易卡号 Like " & txt & " Or 对方账号 Like " & txt
tbl1.DataTable.load()
tbl2.DataTable.loadFilter = "交易账号 Like " & txt & " Or 交易卡号 Like " & txt & " Or 对方账号 Like " & txt
tbl2.DataTable.load()
End If