主题：[求助]文本框TextChanged报错

老师，见图，在文本框录入“-”时，报错；直接在单元格录入没有问题。

TextChanged 代码：

Dim dr1 = DataTables("数据表").Find("[案号] = '" & e.Form.Controls("ComboBox1").Text & "'")
If dr1 IsNot Nothing Then
    dr1("合并审理") = e.Form.Controls("TextBox1").text
    e.Form.Controls("TextBox2").text = dr1("案件数量")
End If

此主题相关图片如下：image 22.jpg

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:2018-8-8测试合并审理.table