高分求助：VB插件
电脑的F8键坏了，大家是用VB的，都知道这意味着什么。目前还不能换新电脑，希望做一个VB插件，按其它功能键如F10来代替F8进行调试。请大家给点代码，高分相送。

[解决办法]
Hook WM_KEYUP，然后改变消息参数
[解决办法]
楼上可能是用神州的本本。经常会掉键的。
用keydown事件，但是，怎么向系统发消息呢。。。没遇到过，学习。。
[解决办法]
http://www.m5home.com/bbs/dispbbs.asp?boardID=10&ID=517&page=1

用这个代码改改看......

这是我以前为打CS而写的一个屏蔽WIN键的代码,可以改一下.

Select Case P.vKey
Case VK_LWIN, VK_RWIN '如果按了WIN键
fEatKeystroke = True '就吃了
End Select

这里改成这样:

先添加一个常量声明.

Private Const VK_F10 As Long = &H79

然后:

Select Case P.vKey
Case VK_F10 '如果按了F10键
fEatKeystroke = True '让F10不起作用
SendKeys "{F8} " '模拟一个F8功能
End Select

我现在在网吧,没有环境,无法帮你测试,抱歉了......
[解决办法]
插件编程的我不懂，
看这个 http://www.mndsoft.com/Blog/article.asp?id=774
[解决办法]
插件不会，这个勉强凑合
Private Declare Function GetAsyncKeyState Lib "user32 " (ByVal vKey As Long) As Integer
Private Declare Sub Sleep Lib "kernel32 " (ByVal dwMilliseconds As Long)

Private Sub Form_Load()
Dim i As Integer
Dim n1 As Long, n2 As Long
Me.Show

While True
DoEvents
Sleep (150)
i = GetAsyncKeyState(vbKeyF6)
If i <> 0 Then
SendKeys "{F8} "
End If
Wend
End Sub

Private Sub Form_Unload(Cancel As Integer)
End
End Sub
[解决办法]
可以捕捉F6,然后放松F8这样就能把F6替代F8了,明白找个代码给你
[解决办法]
在当前vb程序中怎么编程都不行，最好修改一下键盘，也就是重新调整键盘码，搜索一个这样的软件。把F8和F10调换就可以了，对任何程序都有效，我用过这东西不是什么插件。
是一个修改键盘的程序。
[解决办法]
换键精灵

http://38x.xdowns.com/xdowns/UploadFile/2006-4/2006411271049419.rar