| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付买域名,送MP3、MP4
高端软件开发 = 年薪十万不是梦赛孚耐:软件保护加密专家身份认证令牌USB KEY买空间,免费送域名(厦门中资源)
共有 298 人关注过本帖
标题:(求助)读取CSV文件内容到SPREAD表格
收藏  订阅  推荐  打印 
kamo
Rank: 1
等级:新手上路
帖子:4
积分:144
注册:2008-7-31
(求助)读取CSV文件内容到SPREAD表格

一个CSV文件,内容如下

番号,尺寸,颜色,总数
1,L,BLK,21
2,M,BLK,12
3,S,WHT,20
4,M,WHT,7
5,L,WHT,17
。。。

(第一行为固定)    如何将它写入到SPREAD表格。,拜托了

我是新人,希望有人帮帮我,不胜感激        在线急等

[ 本帖最后由 kamo 于 2008-7-31 18:40 编辑 ]
搜索更多相关主题的帖子: CSV  SPREAD  
2008-7-31 18:27
kamo
Rank: 1
等级:新手上路
帖子:4
积分:144
注册:2008-7-31

哪位大哥知道的说下呀,在线急等
2008-7-31 18:42
octillion
Rank: 3Rank: 3
等级:中级会员
帖子:195
积分:2156
注册:2008-7-24

文件读取,字符串处理。具体做法看书。
2008-7-31 18:51
simpson
Rank: 4
等级:高级会员
威望:5
帖子:786
积分:8036
注册:2006-11-16

在提示点   
文件逐行读取 Line input
分割字符串  split(str,",")
将字符串写入SPREAD 应该会吧   不会就不要用SPREAD了


先打基础
2008-7-31 22:21
kamo
Rank: 1
等级:新手上路
帖子:4
积分:144
注册:2008-7-31

谢谢大侠们的提点,现在问题已经解决。

Private Sub cCmdCommand_Click()

    Dim iFileNumber As Integer
    iFileNumber = FileSystem.FreeFile()
    Dim Value As Variant
    Dim arrLine() As String

    Open "C:\Documents and Settings\WUDING\デスクトップ\kayi\test.txt" For Input As #iFileNumber

    Dim stResult As String
    Dim i As Long
   
    i = 1
   
    Do While (Not FileSystem.EOF(iFileNumber))
        
        Dim stBuffer As String
        Line Input #iFileNumber, stBuffer
        arrLine = Split(stBuffer, ",")

        vaSpread1.SetText 1, i, arrLine(0)
        vaSpread1.SetText 2, i, arrLine(1)
        vaSpread1.SetText 3, i, arrLine(2)
        vaSpread1.SetText 4, i, arrLine(3)

    i = i + 1
    Loop

    Close #iFileNumber

End Sub

另外想问一下,如果我只想读取文件里的某一条内容,又该怎么办呢?谢谢

[ 本帖最后由 kamo 于 2008-8-5 13:26 编辑 ]
2008-8-4 16:43
kamo
Rank: 1
等级:新手上路
帖子:4
积分:144
注册:2008-7-31

有没有哪位大哥大姐知道呀,拜托了
2008-8-5 13:26
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.068789 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved