按钮代码:
DataTables("电梯信息表").Load
Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("电梯信息表")
If txt = "" Then
tbl.Filter = ""
Else
txt = "'*" & txt & "*'"
' tbl.Filter = "出厂编号 Like " & txt & " Or 使用单位 Like " & txt & " Or 额定载重量 Like " & txt & " Or 设备所在镇 Like " & txt
tbl.Filter = "出厂编号 Like " & txt & " Or 使用单位 Like " & txt
End If
搜索功能实现,但是,按下按钮后报错如下:
.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2015.11.2.1
错误所在事件:窗口,定期检验资料录入,CheckBox17,CheckedChanged
详细错误信息:
System.NullReferenceException: 未将对象引用设置到对象的实例。
在 UserCode.A2jGaEon9R6HSNINi(ControlEventArgs e)