Foxtable(狐表)用户栏目专家坐堂 → [求助]如何实现模糊查找


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

主题:[求助]如何实现模糊查找

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


加好友 发短信
等级:婴狐 帖子:66 积分:542 威望:0 精华:0 注册:2015/4/13 14:01:00
[求助]如何实现模糊查找  发帖心情 Post By:2015/4/23 11:57:00 [显示全部帖子]

With Tables("十二组")
    Dim c As Integer = .Cols("产权人").Index
    .Select(0,c,.rows.count - 1,c)
End With
Dim Val As String = RibbonTabs("工作中心").Groups("办理手续专区").Items("查产权").Items("产权人").Text
Dim Index As Integer
With CurrentTable
    Index = .FindRow(.Cols(.ColSel).Name & " = '" & Val & "'", .Position + 1,True) 
    If Index >= 0 Then
       .Position = Index
Else
 messagebox.show("我已穷尽所能,没有找到您要查的户呀,产权人如果死亡的需要注明哦!")
     End If
End With

各位老师:上面的代码是获取文本框里的内容,然后精确查找定位到行,如果实现包含文本框内容定位到第一个符合条件行,然后点击超找,在定位到下一个符合条件的行,怎么弄?
也就是在产权人这一列里有张三风  张三疯 张三峰 这三个人,如果我输入张三 然后查找它先定位到张三风  再查找定位到张三疯。。。循环。


还有一个问题,文本框里我输入张三后自动出现张三风  张三疯 张三峰供选择是不是要用别的菜单组件?
[此贴子已经被作者于2015/4/23 12:03:23编辑过]

 回到顶部