使用GetAsyncKeyState闪烁PictureBox

Question

我的代码存在问题：

 Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

If GetAsyncKeyState(Keys.Y) = -32768 Then
        PictureBox2.BackColor = Color.Yellow
    Else
        PictureBox2.BackColor = Color.DarkSlateGray
    End If

    If GetAsyncKeyState(Keys.Oem102) = -32768 Then
        PictureBox1.BackColor = Color.Yellow
    Else
        PictureBox1.BackColor = Color.DarkSlateGray
    End If

End Sub

每毫秒调用一次Timer。 现在当按下一个键时，PictureBox会改变其颜色一秒钟，然后开始闪烁。我正在使用GetAsyncKeyState，因为我希望程序在后台运行。

有没有简单的方法可以解决这个问题？如果不是一个好的解释会很好

谢谢