VB课件弹出式菜单.pptVIP

计算机网络教研室 计算机网络教研室 弹出式菜单设计 065原谅我 16537你惹我生气 20999 爱你久久久 1837 你别生气 目录 1 弹出菜单 2 弹出菜单设计方法 3 为文本编辑器添加弹出菜单 4 上机操作 ①在菜单编辑器中添加菜单，添加的方法与下拉菜单相同，唯一的区别是顶级菜单不勾选“可见”选项。 ②在“鼠标”事件中检测到按了鼠标右键，执行命令： PopupMenu 菜单名，Flags，x，y ③为各菜单编写代码：与下拉菜单的代码编写一样。 弹出式菜单设计 也叫快捷菜单，是一组独立的菜单，在窗体上浮动显示，一般随鼠标右键出现。 1、弹出式菜单 2、设计弹出式菜单 为文本编辑器添加弹出菜单 在“菜单编辑器”末尾添加如下的菜单： 除“格式设置”项外，其余菜单项要勾选“可见”选项。 Private Sub RTB_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) If Button = 2 Then PopupMenu Tmenu, vbPopupMenuLeftAlign, x, y End If End Sub 这段程序若被激发，则会弹出以“Tmenu”为名的菜单组。 在增强文本框的鼠标事件中添加弹出菜单的代码： 思考：这时快捷菜单中的菜单