方法老森和详细的操作步骤如下：
1、第一步，启动VB6.0并创建一个标准项目，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，右键单击表单，然后选择“菜单编辑器”选项，见下图唤含旁，转到下面的步骤。
3、第三步，完成上述步骤后，输入标题和名称，并在标题括号中使用“＆”调用此功能。
输入保存后，可以在下面的显示区域中看到编辑菜单的名称，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，在已创建的菜单下单击，然后创建一个菜单，见下图，转到下面的步骤。
5、第五步，完成上述步骤后，无论创建的菜单是新创建的第一级子菜单还是第二级子菜单，都可以通过编辑区域上的箭头键来实现，单和橡击右箭头按钮后可以看到，在第一级子菜单的前面有四个点，如果是第二级，点将增加到八个，见下图，转到下面的步骤。
6、第六步，完成上述步骤后，创建完成，只需确认即可，现在可以看到刚刚在表单上创建的下拉菜单，见下图。这样，就解决了这个问题了。
VB可通过AddItem 方法，来给下拉列表框输入供选择的内容。
AddItem 方法，用于将项目添加到 ListBox 或 ComboBox 控件，或者将行添加到 MS Flex Grid 控件。不支持命名参数。
ListBox 控件，ListBox 控件显示埋备项目列表，从其中可以选择一项或多项。如果项目总数超过了可显示的项目数，就自动在 ListBox
控件上添加滚动条。
AddItem 方法示例：
本示例使用 Addltem 方法增加 100 项给一个列表框。要检激物验此示例，可将本例代码粘贴到一个带有被命名为 List1 的
ListBox 控件的窗体的声明部分，然后按 F5 键并单击该窗体。
Private Sub Form_Click()
Dim Entry, I, Msg ' 声明变量。
Msg = "Choose OK to add 100 items to your list box."
MsgBox Msg ' 显示信息。
For I = 1 To 100 ' 计数值从 1 到 100。
Entry = "Entry " & I ' 创建输入项。
List1.AddItem Entry ' 添加该输入项。
Next I
Msg = "Choose OK to remove every other entry."
MsgBox Msg ' 显示信息。
For I = 1 To 50 ' 确定如何
List1.RemoveItem I 弯铅毁 ' 每隔一项
Next I ' 删除。
End Sub
Combo1.additem "x"
Combo1.additem "y"
Combo1.additem "z"
一般在form_load（）雹坦好中填写
下拉列表源铅框的话是
list1.additem "x"
list1.additem "y"
list1.additem "z"
一般在信含form_load（）中填写
Private Sub Form_Load()
Combo1.AddItem "text0", 0
Combo1.AddItem "高氏text1", 1
Combo1.AddItem "则念枯text2", 2
Combo1.AddItem "text3"孙洞, 3
Combo1.ListIndex = 0
End Sub
不是在text中添加的，是在list属性下添加，用ctrl+回车 换行，添加下一行掘埋，也可以直接从其他地方复判族蚂制粘贴进list属性里。
用命令添加时要加索引的，用法如下：
Dim i As Integer
For i = 0 To 5
Combo1.AddItem i, i'第一个参数i要求是一穗册个字符串，表示要添加的内容；第二个i是索引，从0开始，2个参数用逗号分开。
Next i