例49：弹出式菜单的使用

本文主要是介绍例49：弹出式菜单的使用，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

1. 建立一个EXE工程，在窗体上放一个popupmenu控件。
2. 设计菜单项如图46：

图46

1. 右键单击popupmenu，点查看代码，添加代码在鼠标右击事件中：

Sub Form1_PopupMenu1_WM_Command(hWndForm As hWnd,wID As ULong)Select Case wIDCase Form1_PopupMenu1_Menu1 ' FileCase Form1_PopupMenu1_Menu2 ' openMsgBox("open")Case Form1_PopupMenu1_Menu3 ' exitMsgBox("exit")End SelectEnd Sub

4.运行程序，当鼠标右击窗体时将弹出菜单，如图47。

图47

这篇关于例49：弹出式菜单的使用的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---