.版本 2
.子程序 _按钮1_被单击
.局部变量 hwnd, 整数型
hwnd = 编辑框1.取窗口句柄 ()
SendMessageA (hwnd, 12, 0, “明天,你好!”)
' SendMessageA (hwnd, 194, 1, “明天,你好!”) ' 加入文本
.版本 2
.DLL命令 SendMessageA, 整数型, "user32.dll", "SendMessageA"
.参数 hwnd, 整数型
.参数 wmsg, 整数型
.参数 wp, 整数型
.参数 lp, 文本型
SendMessage(hwnd,WM_SETTEXT,“text”,0)