呵呵、新版主上任，考考你

Question

我想这可能又是泰山搞的一个新的ID，要不然就同党干的！泰山是高手？？？
看看现在的论坛，有几个星级回复的？？？
他那个高手不过是用多个ID给自己加的分？？？
peaty,smileme,asciiman........
我看现在VB版的初学者实在可怜，没法，我只能过来将巴顿的代码再抄过来！
而这个代码曾经就被泰山说成是垃圾！
请看：
http://www.csdn.net/expert/topic/744/744096.xml?temp=.6809198

Answer 1

大家开始讨论吧
我平时也是用VB开发程序，但发现了VB的一些BUG。
比如用VC开发的EDIT控件在VB中不支持左右键。
上面提到的HOOK程序等。
下面是我用VC写的一个测试程序BOOL StartHook()
{
hKB=SetWindowsHookEx(WH_KEYBOARD,(HOOKPROC)HookProc,hInst,0); return TRUE;
}
BOOL EndHook()
{
BOOL bRet=UnhookWindowsHookEx(hKB);
return bRet;
}LRESULT CALLBACK HookProc(int nCode, WPARAM wParam, LPARAM lParam)
{
if(((DWORD)lParam&0x40000000) && (HC_ACTION==nCode))
{
switch(wParam)
{
case VK_UP:
AfxMessageBox("Up",MB_OK);
break;
case VK_DOWN:
AfxMessageBox("Down",MB_OK);
break;
case VK_LEFT:
AfxMessageBox("Left",MB_OK);
break;
case VK_RIGHT:
AfxMessageBox("Right",MB_OK);
break;
}
} LRESULT RetVal = CallNextHookEx( hKB, nCode, wParam, lParam );
return  RetVal;
}实现当按下方向键时分别弹出一个提示框。
在用VC++写的测试程序中只弹出一个，在VB中弹出三个。

Answer 2

另声明：我不是你们说的其它人，我只是我。还有，我现在有2000多分，可惜我的问题总是少有人回答，目前我只给过几个人加分，每个多则100，少则60，唉！开这个贴子只是让大家讨论一下VB。如果要分，我可白送。一个人的分再多
，又有何用。大家如果还有其它问题，可给我发信email:[email protected]

Answer 3

原来泰山是这样一个人，zyjnb(So) ,你既然冤枉我，是不是应道谦？我平时很少来VB论谈，一则我较忙，二则在用VB做项目时没遇到解决不了的问题。好不容易提一个问题，还被人...
倒霉！！！

Answer 4

问题提出来了，没人回答也罢，却引来不少闲话。
代码贴出来了，你们看了没有？需要的我可以把DLL和VB的测试代码发给你们。