VB.NET2008怎么利用SendMessage修改按钮的Text

   阅读
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用于文本框。
阅读