| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1797 人关注过本帖
标题:split 转换 csv 输入空行如何解决
只看楼主 加入收藏
woa
Rank: 1
等 级:新手上路
帖 子:159
专家分:0
注 册:2008-12-4
结帖率:85.37%
收藏
已结贴  问题点数:0 回复次数:5 
split 转换 csv 输入空行如何解决
文本内是:
d:\ra091222.ibl 773 IVYNET13100 999 2009-12-22 00:06:53 60.21.254.172 68.106.3.150 80 GET HTTP/1.1 200 0 46 572 273 2 /db3.rar - -
d:\ra091222.ibl 774 IVYNET13100 999 2009-12-22 00:06:53 60.21.254.172 68.106.3.150 80 GET HTTP/1.1 200 0 31 572 273 2 /db3.rar - -
。。。。。
现在想转换成csv文件格式,用逗号隔开

Dim stra As String, i As Long
Dim tArray() As String
stra = Text1.Text
tArray = Split(stra, " - -")
For i = 0 To UBound(tArray)
Open "log.csv" For Append As #1
tArray(i) = Replace((tArray(i)), " ", ",")
Print #1, tArray(i)
Close #1




为什么输入一行数据,会再输入一行空行,再输下一行数据
图片附件: 游客没有浏览图片的权限,请 登录注册



[ 本帖最后由 woa 于 2009-12-23 19:50 编辑 ]
搜索更多相关主题的帖子: 输入 split csv 
2009-12-23 15:14
不说也罢
Rank: 13Rank: 13Rank: 13Rank: 13
等 级:贵宾
威 望:39
帖 子:1481
专家分:4989
注 册:2007-10-7
收藏
得分:20 
是你的文本框内容里有换行吧?
用这一句试一下:
tArray(i) = Replace(Replace((tArray(i)), " ", ","), vbCrLf, "")

===================================================
讨厌C#的行尾的小尾巴;和一对大括号{ }
===================================================
2009-12-23 17:42
woa
Rank: 1
等 级:新手上路
帖 子:159
专家分:0
注 册:2008-12-4
收藏
得分:0 
问题的确解决了,什么原因?
而且发现长度的判断是多余的,去掉了。。
2009-12-23 19:51
不说也罢
Rank: 13Rank: 13Rank: 13Rank: 13
等 级:贵宾
威 望:39
帖 子:1481
专家分:4989
注 册:2007-10-7
收藏
得分:0 
因为你截取字符时,后面有一个换行符,在你PRINT的时候,就会换行了呀

===================================================
讨厌C#的行尾的小尾巴;和一对大括号{ }
===================================================
2009-12-23 20:29
woa
Rank: 1
等 级:新手上路
帖 子:159
专家分:0
注 册:2008-12-4
收藏
得分:0 
明白了,有隐藏的换行符
2009-12-24 13:07
lz2644
Rank: 2
等 级:论坛游民
帖 子:28
专家分:20
注 册:2009-8-27
收藏
得分:0 
这里的板主好勤劳 顶一个~

可是呢,然后呢... 
2009-12-25 17:41
快速回复:split 转换 csv 输入空行如何解决
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018702 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved