读书人

VB.NET2008怎么利用SendMessage修改按

发布时间: 2012-02-09 18:22:27 作者: rapoo

VB.NET2008如何利用SendMessage修改按钮的Text?
为了测试 Windows API ,试图点Button用SendMessage修改该按钮的Text,竟然没成功,请教各位高人,应该如何实现?多谢。


Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As String) As Integer


Const WM_SETTEXT As Integer = &HC

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

SendMessage(Me.Button1.Handle.ToInt32, WM_SETTEXT, 1, "test")
End Sub

[解决办法]
用SetWindowText() API
WM_SETTEXT用于文本框。

读书人网 >VB Dotnet

热点推荐