16,717
社区成员
发帖
与我相关
我的任务
分享
把TextBox1.Handle.ToInt32换成目标控件的句柄
Private 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
Private Const EM_REPLACESEL = &HC2
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SendMessage(TextBox1.Handle.ToInt32, EM_REPLACESEL, 1, "aAAAAAk中国")
End Sub