键盘连按，还有问题请教高手前辈。。。。

My2009

学习了，不知这有什么用？

yhxhappy

Local $Array[26][2] =  [ _
                                                ["A", "1200"], _                ;[]内的数字是延时，可自定义，下同
                                                ["B", "1500"], _
                                                ["C", "1600"], _
                                                ["D", "1700"], _
                                                ["E", "1800"], _
                                                ["F", "1900"], _
                                                ["G", "1100"], _
                                                ["H", "1200"], _
                                                ["I", "1300"], _
                                                ["J", "1400"], _
                                                ["K", "1400"], _
                                                ["L", "1500"], _
                                                ["M", "1300"], _
                                                ["N", "1600"], _
                                                ["O", "1700"], _
                                                ["P", "1200"], _
                                                ["Q", "1300"], _
                                                ["R", "2100"], _
                                                ["S", "2200"], _
                                                ["T", "2300"], _
                                                ["U", "2400"], _
                                                ["V", "1800"], _
                                                ["W", "2300"], _
                                                ["X", "2400"], _
                                                ["Y", "2500"], _
                                                ["Z", "1900"]]
                                                
For $i = 0 To UBound($Array)-1
        ToolTip("输入：" & $Array[$i][0] & " 延时：" & $Array[$i][1])
        Send("{" & $Array[$i][0] & "}")
        Sleep($Array[$i][1])
Next