神马品牌网梦幻更新发生错误:看看这个VB中加的API最简单函数哪错了?
来源：百度文库 编辑：神马品牌网 时间：2024/04/27 09:45:31
Private Sub Command1_Click()
LRESULT SendMessage(
HWND hWnd,
UINT Msg,
WPARAM wParam,
lParam lParam
;
End Sub
LRESULT SendMessage(
HWND hWnd,
UINT Msg,
WPARAM wParam,
lParam lParam
;
End Sub
VB附带API函数浏览器，到里面复制
LRESULT SendMessage(
HWND hWnd,
UINT Msg,
WPARAM wParam,
lParam lParam
;
是函数原形，VB不支持，在VB只需要声明知道函数的入口和出口
只要写：
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
就可以了
二楼正解