以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  动态菜单如何实现事件  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=83804)

--  作者:tongyong1969
--  发布时间:2016/4/17 14:12:00
--  动态菜单如何实现事件
1、已实现动态生成菜单,现想点击“资料查看”按钮,切换到资料管理表,看了帮助和论坛还是没搞懂。
2、想在功能组里增加分隔条,代码怎么写?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:动态菜单.rar


--  作者:Hyphen
--  发布时间:2016/4/17 14:31:00
--  
在全局Click事件中加入代码,http://www.foxtable.com/help/topics/1129.htm


If e.Sender.Name = "资料查看" Then
    MainTable = Tables("资料管理表")
End If


--  作者:tongyong1969
--  发布时间:2016/4/17 17:34:00
--  
以下是引用Hyphen在2016/4/17 14:31:00的发言:
在全局Click事件中加入代码,http://www.foxtable.com/help/topics/1129.htm


If e.Sender.Name = "资料查看" Then
    MainTable = Tables("资料管理表")
End If

我上传的例子 已写了,没反应
--  作者:大红袍
--  发布时间:2016/4/17 23:28:00
--  

 如下

 

 

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


--  作者:大红袍
--  发布时间:2016/4/17 23:29:00
--  

 你要做自己的菜单,才能使代码生效。

 

 也就是要添加3个以上的菜单按钮。