主题：[求助]关于窗口自定义录入问题

 

老师,我按照帮助文件做了一个自定义录入界面.见截图,

 

,

 

将TextBox1的TextChanged事件代码设为:

Dim txt As String = e.Form.Controls("TextBox1").Text

Dim tbl As Table = Tables("窗口1_Table1")

If txt = "" Then

    tbl.Filter = ""

Else

    txt = "'*" & txt & "*'"

    tbl.Filter = "客户 Like " & txt & " Or 下单时间 Like " & txt & " Or 订单编号 Like " & txt & " Or 合同号 " & txt & " Or 品名及货号 Like " & txt

End If

 

 

但不知道什么地方有错.在文本框里不能输入文字.一输入就跳掉,见截图.现求助老师给看一看

 

其它的各项功能都很正常为,就是不能查找

请问老师怎样才能上传我做的文件呢?

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

点击浏览该文件:管理项目1.table

哈哈,上传那么呀.我上传好了,请老师请帮助查找原因

老师,文件我已上传了,谢谢你给我看一下吧?

哦,那请问老师,还有其它的方法吗?

老师我是按照帮助文件里的"自定义界面录入之二"一步一步的学着做的.我怕有错,昨天晚上和今天上午我又重做了几遍.结果一样.这是不是和我要查找的数据是从A表自动输入来的的关呢.请给于指点.(我的自定义录入的窗口做在B表)

这是不是我要查找的数据是从表A自动输入来的有关系的呢.