Foxtable(狐表)用户栏目专家坐堂 → [求助]菜单文本框查询怎么弄啊?


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

主题:[求助]菜单文本框查询怎么弄啊?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/9/24 21:37:00 [显示全部帖子]

 如下例子,按钮代码

Dim txt_name As RibbonMenu.TextBox = RibbonTabs("功能区1").Groups("功能组1").Items("文本框1")

If DataTables("表A").Find("供应商 = '" & txt_name.Text & "'") IsNot Nothing Then
    Tables("表A").Filter = "供应商 = '" & txt_name.Text & "'"
Else
    msgbox("没有找到")
End If

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:查询.table


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/9/24 21:56:00 [显示全部帖子]

 在编写事件的窗口那里,你看看右边,是不是又一个 菜单 的选项卡?选中下方的勾勾,然后双击某个菜单看看


 回到顶部