读书人

关于MultiLineEdit控件删除文本末尾空

发布时间: 2012-03-01 10:25:46 作者: rapoo

关于MultiLineEdit控件删除文本末尾空白行的问题
我通过~r~n来分段截取控件中的文本,判断如果是空的话就到此为止,保存前面已经截取的内容,代码是这样的
ls_tzxx = trim(mle_1.text)
ls_tzxx = ls_tzxx + "~r~n"

for i = 1 to mle_1.linecount( )
tmp = trim(left(ls_tzxx,pos(ls_tzxx,"~r~n")))
if tmp = "" or tmp = "~r~n" then
exit
else
ls_tzxx = right(ls_tzxx,len(ls_tzxx)-pos(ls_tzxx,"~r~n"))
ls_new_tzxx = ls_new_tzxx + tmp
end if

next
但我调试的时候,后面几个空白行已经满足tmp=""的条件了,但还是走到else里面去了,我百思不得其解,谁能帮我解惑啊

[解决办法]
tmp = trim(left(ls_tzxx,pos(ls_tzxx,"~r~n")))

改成 tmp = trim(left(ls_tzxx,pos(ls_tzxx,"~r~n") - 1)) 呢?
[解决办法]
用char(13) 和char(10)看看

读书人网 >PB

热点推荐