VB定时按键代码，不知道哪里错了，求高手指点

Question

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Interval = 1000
Timer1.Enabled = False
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Format(Now, "HH:MM:SS") = "16:24:00" Then
SendKeys.Send(keys:=A)
End If
End Sub
End Class

我想在16:24:00时候按A，能运行，但是没按出来，请问代码哪里有问题？谢谢！

Answer 1

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Interval = 1000
Timer1.Enabled = False
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Format(Now, "HH:MM:SS") = "16:24:00" Then
SendKeys"a"
End If
End Sub
End Class

Answer 2

SendKeys.Send(string:="A")
or
SendKeys.Send("A")