回覆列表
-
1 # 鴻村一枝花
-
2 # 人力資源專家楊少俠
你按鍵版本有點低,不知道適不適合,具體參考一下吧:
//下拉列表分別為10,50,100第幾個 = Form1.ComboBox1.ListIndexSelect Case 第幾個 Case 0 延時 = 10 Case 1 延時 = 50 Case 2 延時 = 100End SelectTracePrint 延時Delay 延時
方法如下:除了輸入框為字串,介面返回值大多數是0123456789其中一個,根據這個值再變化即可。如:Dim aMessageBox "下拉框值是"&
Form1.ComboBox1.ListIndexIf
Form1.ComboBox1.ListIndex
= 0 Thena="我"ElseIfForm1.ComboBox1.ListIndex
= 1 Thena="你"ElseIfForm1.ComboBox1.ListIndex
= 2 Thena="他"Elsea="其它"End IfMessageBox "a的值為 "&a