Question

如何让VB在最小化之后仍响应相关事件？

VB最小化之后，如何让一个控件对象响应相应的事件..例如当我最小化VB之后，按下键盘A，则响应Command1的keydown事件..

Answer 1

qw623577789 的回答可以，但是只能在Timer事件触发的时候捕捉到A才可以，错过了就不可以了。可以用如下代码:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Private Sub Form_Resize()
If Me.WindowState = 1 Then‘窗体最小化之后就开始捕捉键A
Do While Me.WindowState = 1
If GetAsyncKeyState(vbKeyA) Then
Command1_KeyDown
End If
DoEvents
Loop
End If
End Sub

Answer 2

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer '声明
Private Sub Form_Load()
Timer1.Interval = 500
End Sub

Private Sub Timer1_Timer()
If GetAsyncKeyState(vbKeyA) Then
Command1_KeyDown
End If
End Sub