1、添加下拉控件combobox
打开画面——点击屏幕右册的控件选项卡,空白处鼠标右键选择 “添加/删除”选项——弹出窗口中找到“Microsoft Froms 2.0 Combobox”
将其添加进去,之后把控件拖到画面中即可;
2、绑定下拉框内容
1)在画面空白处右击——事件——画面对象——其它——打开画面——添加VBS动作
添加如下代码,例如要在combobox01中添加“水、电、天然气”三项内容
Sub OnOpen()
Dim combox1
Set combox1 = ScreenItems("combox01")
combox1.AddItem "水"
combox1.AddItem "电"
combox1.AddItem "天然气"
End Sub