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