Foxtable(狐表)用户栏目专家坐堂 → 切换,有条件(按下去并黄色显示)与无条件(正常)状态怎么让自己制作的菜单按钮也这样


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

主题:切换,有条件(按下去并黄色显示)与无条件(正常)状态怎么让自己制作的菜单按钮也这样

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


加好友 发短信
等级:一尾狐 帖子:437 积分:3682 威望:0 精华:0 注册:2014/4/28 18:50:00
切换,有条件(按下去并黄色显示)与无条件(正常)状态怎么让自己制作的菜单按钮也这样  发帖心情 Post By:2015/7/27 17:03:00 [显示全部帖子]

切换,有条件(按下去并黄色显示)与无条件(正常)状态怎么让自己制作的菜单按钮也这样

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


加好友 发短信
等级:一尾狐 帖子:437 积分:3682 威望:0 精华:0 注册:2014/4/28 18:50:00
  发帖心情 Post By:2015/7/27 17:21:00 [显示全部帖子]

以做切换按钮为例,全局表事件afterfilter
Dim qh As RibbonMenu.ToggleButton = RibbonTabs("库存管理").Groups("常用操作").Items("切换")
For Each dt As Table In Tables
    If dt.Filter <> "" Then
        qh.Pressed = True
    End If
Next

是这样么

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


加好友 发短信
等级:一尾狐 帖子:437 积分:3682 威望:0 精华:0 注册:2014/4/28 18:50:00
  发帖心情 Post By:2015/7/27 17:30:00 [显示全部帖子]

谢谢

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


加好友 发短信
等级:一尾狐 帖子:437 积分:3682 威望:0 精华:0 注册:2014/4/28 18:50:00
  发帖心情 Post By:2015/7/27 17:39:00 [显示全部帖子]

对了
[此贴子已经被作者于2015/7/27 17:40:24编辑过]

 回到顶部