这个问题确实解决不了了 请大家帮帮我
Public Function GetLine(aHwnd As Long, aLine As Long) As String
'函数说明 读获文件框的第N行数据
Dim str(256) As Byte
str(1) = 1 '最大允许存放256个字符
'获取第3行的数据放在str中,转换为字符串后显示在文本框txtString中
SendMessage aHwnd, EM_GETLINE, aLine - 1, str(0) '2就是3
GetLine = StrConv(str, vbUnicode)
End Function
text1.text 的内容如下
aaaaaaa
bbbbbbb
ccccccc
执行下面代码:
MsgBox len(GetLine(text1.hwnd,2)) 返回值为255
我想返回它的绝对数据,text1.text的数据是不固定的
如果在读取的时候 去掉再面的缓冲字符
在线等
[解决办法]
用Split函数
[解决办法]
split可能能行,不成的话你把Dim str(256) As Byte改成dim str 试试,应该就可以了.