老师:下面代码后台数据加载没有显示数据,错在哪里?
Dim tb1 As Table = Tables(e.Form.Name & "_table2")
Dim str As String = DataTables("往来款项").SQLGetComboListString("系统编号","收款提醒 < = #" & Date.Today & "# And 付款_金额 Is Not Null And 款项余额 < 0")
tb1.DataTable.LoadFilter = ""
tb1.DataTable.LoadFilter = "系统编号 In ('" & str.Replace("|","','") & "')"
tb1.DataTable.Load