返回列表 上一主題 發帖

如何可以抓到檔案的最後一筆資料?

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-1-5 12:46 | 顯示全部帖子

如何可以抓到檔案的最後一筆資料?

我想取得最後一筆資料的 Record Number, 找遍了MSDN 上的有關 BOTTOM 的資訊,但是没找到,現在只好用土法鍊鋼的方法如下所示:

Dim tmp As String
Dim inx As Integer
Dim inf_sr As StreamReader = New StreamReader(inf)
        Do While inf_sr.Peek() >= 0
            inx += 1
            tmp = inf_sr.ReadLine()
        Loop
inf_sr.Close()

我要知道 inx 的值,各位大大有没有人知道更進步的方法?
收藏 分享
V98

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
2#
發表於 2011-1-5 14:42 | 顯示全部帖子
那就是這樣子了,暗黑大大在 VB 的索引檔如何操作? 以前我是這樣寫的:

OPEN FILENAME FOR RANDOM AS #8 LEN = 15


CLOSE #8
V98

TOP

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
3#
發表於 2011-1-5 15:44 | 顯示全部帖子
暗黑大大,這過程會一筆一筆的讀,如果我的檔案有1000筆,然後要隨機讀取1000筆內的任一筆資料,要如何寫?
V98

TOP

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
4#
發表於 2011-1-6 09:10 | 顯示全部帖子
暗黑兄:這樣是篩選不是直接讀取,可能的方式是,將檔案放進陣中宜直接索引指定,反正現在的記憶體都很大.
V98

TOP

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
5#
發表於 2011-1-6 16:24 | 顯示全部帖子
本帖最後由 linshin1999 於 2011-1-6 16:44 編輯

可是的原始資料是".txt"檔,目前還不知道如轉換成datatable, 所以就直接放進陣列來處理, 暗黑兄如你知道可教我呼,會很感謝你?
V98

TOP

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
6#
發表於 2011-1-6 21:24 | 顯示全部帖子
謝謝有用,也讓我找到了一個Crystal Report 的論壇.
V98

TOP

        靜思自在 : 有時當思無時苦，好天要積雨來糧。
返回列表 上一主題