none
問題 RRS feed

  • 一般討論

  • 我想在文字檔中讀取幾行文字(不是頭幾行,而是中間的一行),應該怎樣寫呢?
    2011年7月9日 上午 10:58

所有回覆

  • 讀寫文字檔請參考
    http://msdn.microsoft.com/zh-tw/library/system.io(v=vs.80).aspx

    以下以User輸入行數當範例

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    
     Dim fs As New System.IO.FileStream("D:\test.txt", System.IO.FileMode.Open) '要開啟的檔案
     Dim sr As New System.IO.StreamReader(fs) '要讀檔的物件
      Dim strTemp = "" '給迴圈使用的暫存字串
      Dim targetLine = CType(TextBox1.Text, Integer) 'TextBox1為User輸入要讀取的行數
      Dim count = 1
    strTemp = sr.ReadLine() While Not String.IsNullOrEmpty(strTemp) '一列一列讀文字 If count = targetLine Then '目前行數等於輸入行數 MessageBox.Show(strTemp) End If strTemp = sr.ReadLine() count = count + 1 End While sr.Close() fs.Close() End Sub

     


    Shadow與愉快的程式碼伙伴
    自High文不定期更新XD



    2011年7月9日 上午 11:37
  • 先把問題問清楚。

    中間哪一行?隨機一行?永遠第10行?特殊字串格式?特殊字串夾擠?


    論壇是網友平等互助 保證解答請至 微軟技術支援服務
    提問時,錯誤情境描述與錯誤訊息很重要,情境描述包含你做了什麼,預期的結果與實際發生的結果。一個最爛的問法範例:「我的電腦電腦怎麼不能開機?」誰知道你家是不是沒電還是你根本找不到電源鈕。
    2011年7月10日 上午 04:23