例49：弹出式菜单的使用

最新推荐文章于 2025-08-09 09:27:34 发布

曾小猫

最新推荐文章于 2025-08-09 09:27:34 发布

阅读量277

点赞数 3

CC 4.0 BY-SA版权

分类专栏： Visual Free Basic例解教程文章标签：开发语言

本文链接：https://blog.csdn.net/u010763140/article/details/137954056

Visual Free Basic例解教程专栏收录该内容

63 篇文章

订阅专栏

本文介绍了如何在WindowsEXE工程中创建一个带有popupmenu控件的窗体，详细描述了如何在右击事件中处理Menu1（File）、Menu2（open）和Menu3（exit）菜单项，点击后分别弹出提示框显示操作内容。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

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

图46

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

Sub Form1_PopupMenu1_WM_Command(hWndForm As hWnd,wID As ULong)

   Select Case wID

      Case Form1_PopupMenu1_Menu1 ' File

      Case Form1_PopupMenu1_Menu2 ' open

                       MsgBox("open")

      Case Form1_PopupMenu1_Menu3 ' exit

                       MsgBox("exit")

   End Select

End Sub

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

图47