点击自己创建的下拉菜单弹出窗体问题

fmfm · 发表于 2004-5-30 10:52:00

我创建了一个下拉菜单，我想通过点击他弹出一个窗体，请问代码是什么，搞不懂了我这样写不行：Set menuItemOpen = newMenu.AddMenuItem(newMenu.count + 1, "mymenu", "-vbarun userform1.show")

雪山飞狐_lzh · 发表于 2004-5-30 11:06:00

在模块里做个函数

sub frmshow

frmtest.show

end sub

fmfm · 发表于 2004-5-30 12:00:00

那怎么和菜单联系起来？ Set menuItemOpen = newMenu.AddMenuItem(newMenu.count + 1, "mymenu", "-vbarun 模块1.frmshow") 这样？（忘了模块的英文了：））

zzz8662 · 发表于 2004-6-2 10:25:00

我也遇到同样的问题，请详细解释一下，好吗？

gzy · 发表于 2004-6-2 22:47:00

lzh741206的frmshow是过程名，frmtest就是你想要调出的窗体名 -vbarun的最后一个引号前要加上空格。

zzz8662 · 发表于 2004-6-3 14:50:00

谢谢，问题解决了。其实，感觉修改acad.mnu比较方便，

Id_mymenu [mymenu]^C^C-vbarun frmshow

账号		自动登录	找回密码
密码			注册