| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 690 人关注过本帖
标题:[求助]读取excel表格的数据,少了第一条记录
只看楼主 加入收藏
guiyangl015
Rank: 1
等 级:新手上路
帖 子:125
专家分:0
注 册:2006-5-21
收藏
 问题点数:0 回复次数:2 
[求助]读取excel表格的数据,少了第一条记录

在利用ADO打开excel表格的时候,首先读取行数和列数(或是记录和字段):
i = Rst.RecordCount
j = Rst.Fields.Count
发现少了一条记录,即i值比实际的少1,不知道怎么回事?
于是把i 改成i = Rst.RecordCount +1

接着往下赋值:
redim z(1 to i,1 to j)
For m = 1 To i
If m = 1 Then
rst.MoveFirst
Else
rst.MoveNext
If rst.EOF Then
rst.MoveLast
End If
End If

For n = 1 To j
z(m, n) = rst.Fields(n - 1).Value
Next n
Next m
db.Close
Set rst = Nothing
Set db = Nothing
发现,还是读不了第一条记录,反而最后一条记录有两条!晕倒!怎么回事???

搜索更多相关主题的帖子: excel 表格 数据 记录 
2006-11-21 10:56
学习VB才2天
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1653
专家分:0
注 册:2006-5-4
收藏
得分:0 
改一下-1 试试......

[GLOW=255,DeepPink,3]我的免费网盘[/GLOW]
2006-11-21 11:37
simpson
Rank: 3Rank: 3
等 级:论坛游民
威 望:7
帖 子:863
专家分:17
注 册:2006-11-16
收藏
得分:0 

不要用for循环啊

用do 语句


全国最大的 Java专业电子书免费分享[url]http:///in.asp?id=xrmao[/url]
2006-11-21 12:49
快速回复:[求助]读取excel表格的数据,少了第一条记录
数据加载中...
 
   



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

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