如何将菜单栏中剪切复制粘贴，插入按钮到工具栏控件中？ - 编程论坛

#2

风吹过b2017-08-31 16:08

单击工具栏对应按钮时，调用菜单项这个过程。

#3

wmf20142017-08-31 16:21

在Toolbar1_ButtonClick事件中添加相应的调用点击菜单的代码即可，下述代码演示了工具栏的打开和保存的功能：
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
If Button.Key = "open" Then open_Click '如果是打开按钮则调用菜单的open_Click过程打开文件
If Button.Key = "save" Then save_Click '如果是打开按钮则调用菜单的save_Click过程保存文件
End Sub

只有本站会员才能查看附件，请登录

#4

ZHRXJR2017-08-31 18:46

刚刚看了一下你的程序，问题不少，如果要正确运行，估计需要你下不少功夫。
你的几个过程均实现不了，尤其是打开过程，牵扯的文件类型比较多（所有文件、文本文件、Excel文件、Word文件、Jpg文件、PDF文件、ppt文件），各种文件类型有自己的打开方式，不是直接加载到 RTB1 控件中的。

#5

oklao52017-09-01 15:45

回复 3楼 wmf2014