首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

原因?什么情况会发生这样的状况

2012-02-03 
求助原因?什么情况会发生这样的状况?VB codeOn Error Resume Nexty y * &H10000On Error Resume Nextk

求助原因?什么情况会发生这样的状况?

VB code
On Error Resume Nexty = y * &H10000On Error Resume Nextk = PostMessage(wbhwnd, WM_RBUTTONDOWN, MK_LBUTTON, ByVal ((y) + x))k = PostMessage(wbhwnd, WM_RBUTTONUP, 0, (x + (y)))x = x + 60y = 37 * &H10000'下面怎么不运行呢?是什么原因阻塞了?k = PostMessage(wbhwnd, WM_LBUTTONDOWN, MK_LBUTTON, ByVal ((y) + x))k = PostMessage(wbhwnd, WM_LBUTTONUP, 0, (x + (y)))

 求助原因?什么情况会发生这样的状况?


[解决办法]
去掉On Error Resume Next
看哪行出错
句柄得到了么?
常数赋值了么?
X和Y数据类型对了么?
[解决办法]
整数跟Long不一样吧
VB code
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long 

热点排行