VB怎么创建下拉列表？

添加一个combobox,在属性栏里有一个List项,用鼠标点它就会出来一个下拉框,你在下拉框里边写东西,一个代表一个项目
注意:换行时要用ctrl+加车,否则焦点就没了,还得重新点击输入

在程序里也可以这样:
combo1.AddItem "项目1"
combo1.AddItem "项目2"
...
combo1.AddItem "项目n"

材料/工具：VB
1、启动VB6.0，创建一个标准工程。

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

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

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

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

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

没有工具栏的话如下操作：视图---工具箱。
工具栏中没有combobox控件如下操作：在工具栏上点右健，选择部件 在弹出的框中找到Microsoft Forms 2.0 Object Library 把前边的方框选上钩，点确定。
找到 combobox控件 拖到窗体中

默认名称为ComboBox1
combobox控件添加项 ComboBox1.AddItem "要添加的内容"
combobox控件清空项 ComboBox1.Clear
combobox设置下拉项的多少 ComboBox1.LineCount = 2 '2为显示两列
combobox 显示的值 ComboBox1.Value = "显示的内容"

VB6企业版有这个控件，就是ComboBox，你把它的DropDown属性设置为3（好像是，不怎么用了，你自己试下），然后用代码添加项目：

Combo1.AddItem 内容

或者设置List属性来完成。

新建一个标准EXE工程，在空白窗体上添加一个combobox这个控件，如果没看到控件式具箱，请按菜单：视图---工具箱。然后在代码窗口中输入下如下代码：
Combo1.AddItem "今天"
Combo1.AddItem "明天"
Combo1.Text = "请选择"

---