Foxtable(狐表)用户栏目专家坐堂 → 菜单问题


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

主题:菜单问题

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


加好友 发短信
等级:三尾狐 帖子:788 积分:6297 威望:0 精华:0 注册:2012/6/11 17:21:00
菜单问题  发帖心情 Post By:2017/3/12 10:27:00 [只看该作者]


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

点击学生缴证菜单,打印按钮可见,否则不可见,请指点代码错在哪?谢谢!
If e.Form.Strips("缴证信息").Items("学生缴证").Text = "学生缴证" Then
    e.Form.Controls("打印").Visible = True
Else
    e.Form.Controls("打印").Visible = False
End If


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


加好友 发短信
等级:六尾狐 帖子:1242 积分:9386 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2017/3/12 11:59:00 [只看该作者]

1.窗口的AfterLoad事件
e.Form.Controls("打印").Visible = False

2.菜单的ItemClick事件
Select Case e.StripItem.Name
    Case "学生缴证"
        e.Form.Controls("打印").Visible = True
End Select


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


加好友 发短信
等级:三尾狐 帖子:788 积分:6297 威望:0 精华:0 注册:2012/6/11 17:21:00
  发帖心情 Post By:2017/3/12 18:01:00 [只看该作者]

这样点击其它菜单后不能关闭打印按钮
1.窗口的AfterLoad事件
e.Form.Controls("打印").Visible = False

2.菜单的ItemClick事件
Select Case e.StripItem.Name
    Case "学生缴证"
        e.Form.Controls("打印").Visible = True
End Select

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/12 19:33:00 [只看该作者]

 你如果要隐藏打印按钮,那,就在你做其它操作的时候,比如点击其它菜单的时候,把其设置成不可见。


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


加好友 发短信
等级:三尾狐 帖子:788 积分:6297 威望:0 精华:0 注册:2012/6/11 17:21:00
  发帖心情 Post By:2017/3/15 19:04:00 [只看该作者]

谢谢

 回到顶部