如何在vb原有菜单中加入自己的项。 如何在vb原有菜单中加入自己的项。比方说,在VB中file菜单有打开这个选项,我如何也能实现类似的功能。每次启动VB都在会在菜单中有自己的选项。我原来以为是通过修改注册表实现,但是查了一下,好像没有。请高手指教。谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 将其中一项做成菜单数组,在使用中LOAD它 原有菜单Item按顺序编上索引号,名字相同。然后用load引导添加,下面是我写的测试代码。谨供参考。Private Sub Command9_Click() '增加菜单项先加索引再Load If RTmenu < 6 Then RTmenu = RTmenu + 1 Load Runtest(RTmenu) If RTmenu = 1 Then '创建第一项时同时创建分隔符 Runtest(1).Caption = "-" RTmenu = RTmenu + 1 Load Runtest(RTmenu) Runtest(RTmenu).Caption = "Option #" & (RTmenu - 1) Else Runtest(RTmenu).Caption = "Option #" & (RTmenu - 1) End If End If End Sub 各位可能理解错了。我说增加菜单中的选项,不是指我自己程序中的,而是说VB的IDE环境中的。 这是VB插件的问题,你可以在建一个“外接程序”(VB工程中选),它自带一个示例,你变通一下就可以在file下添加菜单条。 为什么用VB写的DLL,如果参数为字符串类型就会有问题 放100分求帮助Excel! 将几个工作簿的一固定列自动添加到一个固定的工作簿的一列里 vb传递存储过程参数的问题!急,急! 很难得的学习资料像大家推荐 如何把datagrid控件内容保存为图片 在图形上添加文本 listview滚动条如何显示? 提个问题:这几天,哪位湖南的网友来广州工作了?? 十万火急,有关于VB ADO与SQL SERVER 建立连接的问题(在线等待) 如何使用代码(而不是菜单编辑期)在程序中手动建立菜单 如何移到窗口到需要的位置? 100分求解菜单名称。(在线等待)
If RTmenu < 6 Then
RTmenu = RTmenu + 1
Load Runtest(RTmenu)
If RTmenu = 1 Then
'创建第一项时同时创建分隔符
Runtest(1).Caption = "-"
RTmenu = RTmenu + 1
Load Runtest(RTmenu)
Runtest(RTmenu).Caption = "Option #" & (RTmenu - 1)
Else
Runtest(RTmenu).Caption = "Option #" & (RTmenu - 1)
End If
End If
End Sub
我说增加菜单中的选项,不是指我自己程序中的,而是说VB的IDE环境中的。
它自带一个示例,你变通一下就可以在file下添加菜单条。