战鼓网:VB里要用一个sendmessage函数，谁给写个完整实例，谢谢了

来源：百度文库编辑：中科新闻网时间：2024/04/19 15:55:20

因为这是我第一次在VB里用API函数，所以加不好。因为API函数我不会，还想借此机会顺便了解一下。API函数声明我知道，就是加API函数一加就加错，编译器报说函数语法错误。这里先谢谢了。我只有12分了，不好意思。

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

Const WM_CLOSE = &H10

Private Sub Command1_Click()
SendMessage Me.hwnd, WM_CLOSE, 0, 0
End Sub

在窗体中加一个按钮。

窗体模块中声明要用private，如果直接从API浏览器中复制代码放在窗体模块中的话，会出错的。

http://lib.yctc.edu.cn/study/bckj/cx/program/vb/Vb029.htm

VB里要用一个sendmessage函数，谁给写个完整实例，谢谢了 [VB]中使用SendMessage函数向对象发送消息的技巧和方法求一个API函数：用sendmessage向一窗口发送一句“你好！” sendmessage函数谁给写个完整实例?(里面有参数设置的,VB中),谢谢大虾们了!!! VB中的一个函数问题 VB的一个API函数 VC++ 中CWnd::SendMessage( )函数的作用是什么？ VB中如何用sendmessage来改变command的大小 vb高手请进（一个函数） VB一个API函数的用法