Foxtable(狐表)用户栏目专家坐堂 → 查找代码


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

主题:查找代码

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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57640 威望:0 精华:15 注册:2008/9/1 9:45:00
查找代码  发帖心情 Post By:2009/1/21 15:31:00 [显示全部帖子]

with e.Form
    if e.sender.text <> "请输入IO" then
        Dim dst As WinForm.DataList = .Controls("DataList1")
        Dim txb1 As WinForm.TextBox = .Controls("TextBox1")
        dst.RowFilter = "[IO] Like '*" & txb1.text & "*' "
      
      
    end if
end with

各位老大,上面的一段代码是我从华海转换而来,我想将这句代码 dst.RowFilter = "[IO] Like '*" & txb1.text & "*' "换一下,本来我只能输入[IO]字段的数据才能查找,现在我在"TEXTBOX1"中输入任何我要的数据都能查找出来.(相当于模拟查找).

 

 

 

 


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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57640 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2009/1/21 15:54:00 [显示全部帖子]

以下是引用菜鸟foxtable在2009-1-21 15:53:00的发言:
dst.RowFilter = "[IO] Like '*" & txb1.text & "*' "
这一句本来就限定了查找数据的列为IO

  就是我想不限定IO,用一个通配符解决.


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


加好友 发短信 一级勋章
等级:狐仙 帖子:9879 积分:57640 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2009/1/21 17:15:00 [显示全部帖子]

  没有人帮忙吗?

 回到顶部