求助

Question

这个是个例子，send是什么都无所谓，后面的send2被转义了

Answer 1

Declare Function SendMessageW Lib "user32" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Dim TempSend as String
TempSend=send & vbCrLf & send2
SendMessageW aaa, WM_SETTEXT, 1004, ByVal StrPtr(TempSend)

Answer 2

发送没有问题了这时要注意接收有没有问题
因为VB用的是UniCode字符集
而从API浏览器上复制的都是基于ANSI字符集的函数