-- 作者:zhchling
-- 发布时间:2014/8/4 15:27:00
-- table如果没有符合筛选条件的数据,会报错
If e.Form.Controls("ComboBox3").value = "" Then Tables("发车单_Table1").filter= "[日期] = #" & e.Form.Controls("DateTimePicker1").value & "# And ([可信度] not in (\'取消\',\'备用\') or [可信度] is null) " Else Tables("发车单_Table1").filter= "[日期] = #" & e.Form.Controls("DateTimePicker1").value & "# and [起至区间1]=\'" & e.Form.Controls("ComboBox3").value & " \' And ([可信度] not in (\'取消\',\'备用\') or [可信度] is null) " End If
table如果没有符合筛选条件的数据,会报错, 怎么解决这个问题
1. 代码上判断能否有符合条件的数据. 怎么写代码?
2. 如果不写判断的代码. 是不是可以从错误提示上下手,比如,有没有语句设置,不弹出错误提示? 此主题相关图片如下:3333.jpg
[此贴子已经被作者于2014-8-4 15:28:44编辑过]
|