主题：使用Textchanged事件遇到的问题。

比如我的订单表里有10000行数据，这个时候我通过文本框的Textchanged代码：

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 &  " Or 业务员 Like " & txt

 End If

 

这样加载数据后，电脑加载会非常的卡，卡的几乎要反映一会，这个问题该如何解决呢。

数据量大,无解.

有什么其他快速查找的方法吗，求指导，Bin老师！！！

这个没有办法,只能减少数据量. 或者不要放到TextChanged,等输入完毕再点击查询按钮触发

明白了，Bin老师！还有个问题是：我使用的自定义用户，如果使用人比较多的情况下，如何添加一个记住用户名的功能呢。。新手教程里没有这个功能！

论坛有例子,利用SaveConfigValue来保存.  你搜索一下看看.  其实很简单,自己利用SaveCOnfigValue保存一下即可.

Bin老师，是把确认按钮改为如下代码吗？

SaveConfigValue("Register" & ComputerId, e.Form.Controls("TextBox1").Value)
e.Form.Close()

嗯, 可以考虑加个复选框. 判断复选框选中的情况下再保存.

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


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

错误了！

 贴出你出错的代码。