| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何定义菜单类型 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=95899) |
| -- 作者：pcxjxjhkw -- 发布时间：2017/2/8 10:42:00 -- [求助]如何定义菜单类型 如何定义菜单类型： 菜单类型保存在数据表的，如下代码如何改写？谢谢 \'Dim menu As New & dr("菜单类型") & "(""" & dr("菜单名称") & """)" [此贴子已经被作者于2017/2/8 10:52:19编辑过]
|
| -- 作者：有点色 -- 发布时间：2017/2/8 10:42:00 -- 不明白你所指 |
| -- 作者：有点蓝 -- 发布时间：2017/2/8 11:33:00 -- 类似 Dim menuitem As RibbonMenu.RibbonItem Select Case dr("菜单类型") Case "按钮" menuitem = New RibbonMenu.Button(dr("菜单名称")) Case "文本框" menuitem = New RibbonMenu.TextBox(dr("菜单名称")) End Select |
| -- 作者：有点色 -- 发布时间：2017/2/8 11:35:00 -- 用3楼方法，或者动态编译
http://www.foxtable.com/webhelp/scr/1487.htm
|