Question

如何让VB程序在后台接受键盘输入

例如我在百度上搜索，我按下的键都能被VB接收到。
后台 就是没有窗体

Answer 1

给你说个简单好用的办法把
'1添加一个Timer时间控件

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
'申明api

Private Function MyHotKey(vKeyCode) As Boolean
MyHotKey = ((GetAsyncKeyState(vKeyCode) < 0))
End Function

Private Sub Form_Load()
Timer1.Interval = 100 '定时检测
Me.Visible = False
End Sub

Private Sub Timer1_Timer()
If MyHotKey(vbKeyO) Then Me.Visible = True
'还可以换成调用其他函数
End Sub