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

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

我创建了一个下拉菜单，我想通过点击他弹出一个窗体，请问代码是什么，搞不懂了


       


我这样写不行：Set menuItemOpen = newMenu.AddMenuItem(newMenu.count + 1, "mymenu", <FONT color=#d52b2b>"-vbarun userform1.show</FONT><FONT color=#cc3333>")</FONT>

雪山飞狐_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", <FONT color=#d52b2b>"-vbarun 模块1.frmshow</FONT><FONT color=#cc3333>")       这样？</FONT>


<FONT color=#cc3333>（忘了模块的英文了：））</FONT>

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

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

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

<A name=22642><FONT color=#0000ff><B>lzh741206</B></FONT></A>的frmshow是过程名，frmtest就是你想要调出的窗体名


-vbarun的最后一个引号前要加上空格。

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

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


Id_mymenu       ^C^C-vbarun frmshow
页: [1]
查看完整版本: 点击自己创建的下拉菜单弹出窗体问题