1、添加下拉控件combobox
打开画面——点击屏幕右册的控件选项卡，空白处鼠标右键选择 “添加/删除”选项——弹出窗口中找到“Microsoft Froms 2.0 Combobox”
将其添加进去，之后把控件拖到画面中即可；
2、绑定下拉框内容
1）在画面空白处右击——事件——画面对象——其它——打开画面——添加VBS动作
添加如下代码，例如要在combobox01中添加“所有、严重故障、普通故障、警告”四项内容
Sub OnOpen()
Dim combobox1
Set combobox1 = ScreenItems("combobox01")
combobox1.AddItem （"所有"）
combobox1.AddItem （"严重故障"）
combobox1.AddItem （"普通故障"）
combobox1.AddItem （"警告"）
combobox1.Text=("所有")
End Sub
版权声明：本文为zdh03304原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接和本声明。