1、打开需要添加下拉列表的画面,并右击画面空白处,选择对象属性。在事件——打开画面——动作中添加vb程序
Sub OnOpen()
ScreenItems("list").additem("甲")
ScreenItems("list").additem("乙")
ScreenItems("list").additem("丙")
ScreenItems("list").additem("丁")
screenitems("list").listindex=0
screenitems("list1").additem("01")
screenitems("list1").additem("02")
screenitems("list1").additem("03")
screenitems("list1").additem("04")
screenitems("list1").listindex=0
End Sub
这样就是两个下拉列表的内容。多少都可以自行添加。

2、点击右侧智能对象——控件,然后在画面上添加控件,选择Microsoft Froms 2.0 Combobox


3、右键控件,属性选择相对应的下拉列表list,或者list1
这样就完成了。
