請教各位先進:
我有一個文字檔如下:
Known and new addresses. Counting packets
IP-address   Service     received
12.246.173.10             0
61.218.221.128 *ARP         41
61.218.221.129 *ARP         232
61.218.221.130             0
61.218.221.130 netbios-ss       0
**** Process cancelled.
我想把從IP-ADDRESS 到 *****PROCESS 裡面的數值丟入陣列
沒有數質的部份就用0 取代 要如何去做?
可否請各位大哥教教小妹我 大恩不及言謝
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(4) 人氣()


留言列表 (4)

發表留言
  • Kuon
  • 全部都是邏輯觀念.
    File I/O跟String Processing.
  • Alex
  • Kuon 說得不錯,這類問題就是:
    1) 開啟文字檔 (開檔方法本欄討論很多,也有 sample code ,請檢索一下)
    2) 逐列(或逐字,看您的需要)讀取檔案內容。
    3) 作些簡單的字串處理(使用 VB 的內定字串 functions ,不夠用就自己寫一些)
    4) 處理好存入 array
    就這樣簡單。重在「自己練習」。
  • HK
  • 再請問一下我想要從特定的某行開始往下逐行讀取該用哪些函數?有程式碼可以提供參考嗎?
  • Dave
  • 下面是我目前想到的一種 solution,不知其他高手是否有更好的解法?
    Dim fsQ As New FileSystemObject
      Dim txtfQ As TextStream
      Dim strQ As String
      Dim i As Integer
     
      Set txtfQ = fsQ.OpenTextFile("c:\test\Test.txt")
     
      ' 如想從第十一列開始,可利用 TextStream 物件的SkipLine 方法
      ' 跳過前十列。
      For i = 1 To 10
       txtfQ.SkipLine
      Next i

    ' 從第十一列開始往下讀
      Do While Not txtfQ.AtEndOfStream
       ' your code here

    Loop

    txtfQ.Close
     
      Set txtfQ = Nothing