我想做一个VB程序,让它在后台运行,并且时时刻刻监控着键盘。
例如:在正常情况下,F5的作用是刷新,我在VB程序里面改变它的作用,按下F5后就调用A.EXE。。
我想使这个VB程序在后台运行的时候,按F5键的时候,就调用A.EXE!
问高手们这个可不可以做啊,怎么做?
例如:在正常情况下,F5的作用是刷新,我在VB程序里面改变它的作用,按下F5后就调用A.EXE。。
我想使这个VB程序在后台运行的时候,按F5键的时候,就调用A.EXE!
问高手们这个可不可以做啊,怎么做?
解决方案 »
- VB 和 MYSQL 的想法
- 给WORD中的文本添加标记
- 请高手指点:我的背景填充的代码只能用一次!————————————————急!
- 用了WINSOCK但是连接不上不知道是什么原因
- 全球40万人签名反对日本成为联合国常任理事国
- @@@@@ 请CSDN的Blog团队来回答我的这个问题 @@@@@
- 如何合并单元格及调整单元格中的内容!及将报表输出到WORD中!
- 关于ip怎样获得的问题!100分
- 远程自动化问题?
- 寻找VB控件
- 我在一个module里定义了一个public的结构体,为什么在一个class module里却用不起来?
- 如何读取数据库中的IMAGE字段并将图像显示在RichTextBox中?
调用A.EXE:
Public Declare Function ShellExecute _
Lib "shell32.dll" Alias "ShellExecuteA" _
( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long _
) As Long
Call ShellExecute(Me.hwnd, "Open", App.Path + "\a.exe", "", "", 1)
Private Sub tmrSystem_Timer()
Dim intKey As Integer
intKey = (GetAsyncKeyState(VK_F5) And &HFF00) / 2 ^ 15
If intKey = -1 Then 'F5
shell App.Path + "\a.exe"
End IfEnd Sub