永发信息网

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

答案:2  悬赏:60  手机版
解决时间 2021-04-04 19:27
vb6如何判断并删除字符串首行的空行或空格。
最佳答案
删除行首、行尾空格可用trim、Ltrim、Rtrim函数
删除空行,可以读取一行并判断它是否为“”,是,接着读下一行。追问删除空行,是否要用split(str1,vbcrlf)把每行放进数组,然后循环进行判断,遇到非空行时退出循环?
如果这样的话,如果判断前两行是空行,如何把之后的所有行连接起来,如果用for next,如果有1000行,就要从第3行next到1000行,会不会效率低下?
有没有办法直接从数组里把前两行减去?追答一次读取所有文件内容,才会用到split(str1,vbcrlf)去判断

如果用行读取,读一行判断一行就是了。

用文本文件去处理已经谈不上效率问题,可考虑别的办法解决效率问题。追问我不是读取文本文件呀,我是直接获取到一段文字。
全部回答
快速将一段多行字符串去掉每一行前后空格的办法:将字符串写入任意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中,每一行的前后空格都去掉了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
如图所示,甲船上的人用力推乙船,甲船也向后
怎样清除苹果手机相机内存
求经典广告语,至少10句,最好大家都知道的
国内的儿童DIY手工坊品牌哪些好做,适合小城
丽江海蓝云天客栈没空调冬天冷吗
表示碰到什么东西22舒服用什么字
日本轰炸南京飞机从哪起飞
单选题若关于x的不等式|x+1|-|x-2|<a2-4a有
女方二婚男方头婚准生证怎么办
草坪里的草能让猫当猫草吃吗
怎么把拨号连接关掉,怎么取消拨号连接网络
航旅纵横,不合理的发布版本参数,怎么解决
微店怎么给别人管理,怎么转载别人微店里的图
屈臣氏骗人
等一个秋天现代诗歌,关于秋天的现代诗
推荐资讯
死鱼活鱼吃起来有什么区别吗?
一个人能肩上负重180斤能走多远
关于白子画有一首歌歌词有孑然一身的轻寒是什
海马三肾丸在哪有得买
娶个衡水小姑娘,需要什么条件 一般要多少大
王者荣耀多少人民币能买满5级铭文
专科生学建筑设计专业有前途吗?
电梯奇遇原稿
沃尔沃Ⅹc6o是紧凑型吗
关于低碳环保的口号,低碳环保标语 5分
已知函数y=(2m+1)x+m+1(x是自变量),(1
一公里长的公路,6米宽,采用三油四料贯入式成
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?