你按键版本有点低,不知道适不适合,具体参考一下吧:
//下拉列表分别为10,50,100第几个 = Form1.ComboBox1.ListIndexSelect Case 第几个 Case 0 延时 = 10 Case 1 延时 = 50 Case 2 延时 = 100End SelectTracePrint 延时Delay 延时