vb6如何判断并删除字符串首行的空行或空格。

发布网友发布时间：2022-12-09 06:16

共2个回答

热心网友时间：2023-09-19 15:22

快速将一段多行字符串去掉每一行前后空格的办法：将字符串写入任意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中，每一行的前后空格都去掉了

热心网友时间：2023-09-19 15:23

删除行首、行尾空格可用trim、Ltrim、Rtrim函数
删除空行，可以读取一行并判断它是否为“”，是，接着读下一行。