首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

小弟我用sendmessage 涵数向其他程序发送字符时出现了有关问题

2012-01-29 
我用sendmessage 涵数向其他程序发送字符时出现了问题程序语句如下:sendtextwinhwnd1,Text3.textsendtext

我用sendmessage 涵数向其他程序发送字符时出现了问题
程序语句如下:
sendtext   winhwnd1,   Text3.text       'sendtext是一个自定义函数,winhwnd1是其他程序文字编辑框的句柄,text3是自身程序的textbox

sendtext   函数如下:

Private   Sub   sendtext(hwnd   As   Long,   text   As   String)   '发送字符函数
Dim   str   As   String,   data()   As   Byte,   i   As   Long
str   =   text
i   =   0
data   =   StrConv(str,   vbFromUnicode)
While   i   <=   UBound(data)

    If   data(i)   <   128   Then
        SendMessage   hwnd,   &H102,   data(i),   0&
        i   =   i   +   1
    Else
        SendMessage   hwnd,   &H102,   data(i),   0&
        SendMessage   hwnd,   &H102,   data(i   +   1),   0&
        i   =   i   +   2
    End   If
Wend
End   Sub

以上语句调试时没有出现什么问题,但编译后使用时却发现,当text3(自身程序的textbox)内容为多行文本时,字符发送给其他程序后,其他程序的文本框接收到的并不是多行内容,而是单行内容,但字符数量并没有少,也就是说它自动将多行转成单行,请问这是咱回事,怎么解决?
多谢了!


[解决办法]
其他程序的文本框确定是多行的?
[解决办法]
你说的那个 其他程序的文本框 是多行的吗?

不是的话它不会换行的。

热点排行