在textChanged里面放入几个筛选。其中一个是
Dim dic As new Dictionary(of String,String)
dic("单位名称") = e.Form.Controls("TextBox1").Text
dic("编号") = e.Form.Controls("TextBox4").Text
Dim stad As String = e.Form.Controls("DateTimePicker1").Value
Dim Endd As String = e.Form.Controls("DateTimePicker2").Value
Vars("PJHKQDTJ1")=Functions.Execute("赋值筛选条件_日期",dic,stad,Endd,"制单时间 desc,状态") & " and 是否开piao='是' and 状态='已开piao' or 状态='已回款' or 状态='回款中'" '筛选条件
Vars("PJHKPage1")=1
Functions.Execute("分页加载_e_排序条件_筛选表_赋值表_变量_页数",e,"制单时间 desc,状态","制单表_单位_地址明细",e.Form.Name &"_Table2",Vars("PJHKQDTJ1"),"PJHKPage1") '筛选自定义函数
怎么能判断用户在这个几个TextBox里面输入数据？如果用.Text>"" 在清空值的时候不能恢复原来的筛选
加好友 
发短信
Post By：2020/12/21 17:25:00 [只看该作者]
