UC知道VB 中的sendmessage的用法 高手进
来源：百度知道 编辑：UC知道 时间：2024/05/09 09:58:14
我想用sendmessage给自己窗口发一个WM_CLOSE,达到结束自身的作用,代码是什么我记不得了!请高手帮忙写一下,越简单越好,那些一篇一篇复制张贴的给我滚出去!
用API文本...把sendmessage函数插入进去!如下:
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
这是常数:
Private Const WM_CLOSE = &H10
Pirvate sub command1)Click()
SendMessage me.hwnd,WM_CLOSE,0,0
End Sub
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_CLOSE = &H10
Private Sub Command1_Click()
SendMessage hwnd, WM_CLOSE, 0, 0
End Sub