Private Declare Sub Sleep Lib "Kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
SendKeys "賬號1234567", True
Sleep 1000
SendKeys "{TAB}", True
Sleep 1000
SendKeys "密碼7654321", True
Sleep 1000
SendKeys "{ENTER}", True
End Sub
其他功能代碼 自己擴展壹下即可
希望可以幫到妳