vb6如何判断并删除字符串首行的空行或空格。
答案:2 悬赏:60 手机版
解决时间 2021-04-04 19:27
- 提问者网友:心如荒岛囚我终老
- 2021-04-04 11:20
vb6如何判断并删除字符串首行的空行或空格。
最佳答案
- 五星知识达人网友:长青诗
- 2021-04-04 12:08
删除行首、行尾空格可用trim、Ltrim、Rtrim函数
删除空行,可以读取一行并判断它是否为“”,是,接着读下一行。追问删除空行,是否要用split(str1,vbcrlf)把每行放进数组,然后循环进行判断,遇到非空行时退出循环?
如果这样的话,如果判断前两行是空行,如何把之后的所有行连接起来,如果用for next,如果有1000行,就要从第3行next到1000行,会不会效率低下?
有没有办法直接从数组里把前两行减去?追答一次读取所有文件内容,才会用到split(str1,vbcrlf)去判断
如果用行读取,读一行判断一行就是了。
用文本文件去处理已经谈不上效率问题,可考虑别的办法解决效率问题。追问我不是读取文本文件呀,我是直接获取到一段文字。
删除空行,可以读取一行并判断它是否为“”,是,接着读下一行。追问删除空行,是否要用split(str1,vbcrlf)把每行放进数组,然后循环进行判断,遇到非空行时退出循环?
如果这样的话,如果判断前两行是空行,如何把之后的所有行连接起来,如果用for next,如果有1000行,就要从第3行next到1000行,会不会效率低下?
有没有办法直接从数组里把前两行减去?追答一次读取所有文件内容,才会用到split(str1,vbcrlf)去判断
如果用行读取,读一行判断一行就是了。
用文本文件去处理已经谈不上效率问题,可考虑别的办法解决效率问题。追问我不是读取文本文件呀,我是直接获取到一段文字。
全部回答
- 1楼网友:洒脱疯子
- 2021-04-04 12:46
快速将一段多行字符串去掉每一行前后空格的办法:将字符串写入任意txt文档(如:d:\1.txt)然后读取到(比如d:\2.txt中),每一行前后空格都会自动去除。
Dim a$,str1$ 'str1是你原来的字符串
rem 将字符串写入1.txt
open “d:\1.txt”for append as #1
print #1.str1
close #1
rem 写入之后会发现1.txt的内容和字符串一模一样,保留空格和空行
rem下面是读取,系统会自动去掉前后空格
Open "d:\1.txt" For Input As #1
Open "d:\2.txt" For Append As #2
Do While Not EOF(1)
Input #1, a
Print #2, a
Loop
close #2
close #1
rem 最后你会发现在2.txt中,每一行的前后空格都去掉了
Dim a$,str1$ 'str1是你原来的字符串
rem 将字符串写入1.txt
open “d:\1.txt”for append as #1
print #1.str1
close #1
rem 写入之后会发现1.txt的内容和字符串一模一样,保留空格和空行
rem下面是读取,系统会自动去掉前后空格
Open "d:\1.txt" For Input As #1
Open "d:\2.txt" For Append As #2
Do While Not EOF(1)
Input #1, a
Print #2, a
Loop
close #2
close #1
rem 最后你会发现在2.txt中,每一行的前后空格都去掉了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯