Foxtable(狐表)用户栏目专家坐堂 → [求助]請問查找功能無法實現,請高手指點一下。


  共有2234人关注过本帖树形打印复制链接

主题:[求助]請問查找功能無法實現,請高手指點一下。

帅哥哟,离线,有人找我吗?
GD007
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:220 积分:1669 威望:0 精华:0 注册:2016/9/3 11:48:00
[求助]請問查找功能無法實現,請高手指點一下。  发帖心情 Post By:2016/9/9 9:01:00 [显示全部帖子]

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("查詢_Table1")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.Filter = "姓名 Like " & txt & " Or 藍卡紙編號 Like " & txt & " Or 通行證編號 Like " & txt & " Or 入職部門 Like " & txt 
End If


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160909085709.png
图片点击可在新窗口打开查看

做一個查詢窗口,在對話框任意輸入內容,查找顯示

 回到顶部
帅哥哟,离线,有人找我吗?
GD007
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:220 积分:1669 威望:0 精华:0 注册:2016/9/3 11:48:00
  发帖心情 Post By:2016/9/9 9:56:00 [显示全部帖子]

謝謝了,再認真學習下


 回到顶部