vb中d出式菜单怎么编写子菜单？

1、按下组合键ALT+F11，打开vba代码编辑窗口。

2、VBA单元格中生成d出式菜单第二步，在左侧的vba工程窗口空白区域上右击鼠标，d出菜单中选择“插入”——“模块”。

3、VBA单元格中生成d出式菜单第三步，在新建的模块中，输入以下代码。

4、定义一个CommandBar对象类型，用来保存单元格右键快捷菜单命令项。

5、再定义了一个菜单项对象，指向CommandBar对象类型的一个新增菜单项，并指定单击新增的命令时执行的子过程名称为test，显示为测试。

6、再定义一个子过程test，用来响应菜单的动作。

7、VBA单元格中生成d出式菜单第四步，将光标定义在第一个过程中，按F5运行该过程。

8、最终效果如图所示。

1、启动VB6.0，创建一个标准工程。

2、在窗体上右键选择“菜单编辑器”，或在“工具”菜单上单击选择也可以。

3、在d出的“菜单编辑器”窗口中，输入标题和名称，在标题括号内用“&”表示可以调出此功能，输入完毕，保存之后，就能在下面的显示区看见刚才编辑的菜单名称。

4、在显示区中单击已经建好的菜单下面，再创建一个菜单。

5、创建的菜单是否是原来新建的一级子菜单，或是二级子菜单，可以通过编辑区上的方向键来实现，单击右方向键按钮后，会看见它的一级子菜单前面有四个圆点，若是二级，圆点会增加到八个。

6、创建完毕后，确定即可，现在在窗体上就可以看见刚才我们创建的下拉菜单了。

VB 的菜单栏不是和 text 或者 label 一样（在左边的控件区域点击就可以）。

而是点击工具栏上面“保存”按钮右边的一个长的像菜单的按钮，或者从“工具”菜单中，选取“菜单编辑器”；或者用快捷键 ctrl+e 都可以调出

而后：

要在菜单编辑器中创建菜单控件，请按照以下步骤执行：

在“标题”文本框中，为第一个菜单标题键入希望在菜单栏上显示的文本。如果希望某一字符成为该菜单项的访问键，也可以在该字符前面加上一个 (&) 字符。在菜单中，这一字符会自动加上一条下划线。

菜单标题文本显示在菜单控件列表框中。

在“名称”文本框中，键入将用来在代码中引用该菜单控件的名字。请参阅本章后面“菜单标题与命名准则”。

单击向左或向右箭头按钮，可以改变该控件的缩进级。

如果需要的话，还可以设置控件的其他属性。这一工作可以在菜单编辑器中做，也可以以后在“属性”窗口中做。

选取“下一个”就可以再建一个菜单控件。

- 或者 -

单击“插入”可以在现有的控件之间增加一个菜单控件。

也可以单击向上与向下的箭头按钮，在现有菜单控件之中移动控件。

如果窗体所有的菜单控件都已创建，选取“确定”可关闭菜单编辑器。

创建的菜单标题将显示在窗体上。在设计时，单击一个菜单标题可下拉其相应的菜单项。

---