VB api 向其他程序sendmessage 无效果

[FoolRabbit]

VB api 向其他程序sendmessage 无效果

hcl为某程序中文本框的句柄，此句柄能保证正确，其类名跟踪查看过。
strbuff为一个字符串，现在发送信息无反应，有没有大神知道其原因？

Private Const WM_SETTEXT = &HC '设置文本

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

SendMessage hcl(n), WM_SETTEXT, 0&, ByVal strBuff


我是用EnumChildWindows获得控件句柄
用GetClassName判断类名的

刚测了下FindWindowEx获得控件句柄（记事本测试）的，居然可以，这是什么原因啊，我有好多个文本框诶

[FoolRabbit]

delphi写的都可以，vb写的不行，郁闷得嘞

[FoolRabbit]

我的神啊，我知道了
API错了

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

汗，傻了

[贝隆]

呵呵，VB中的SendMessage API声明和C中的原型是有所区别的。
参考一下这个：http://download.csdn.net/detail/veron_04/1441577