Question

所以我对此有点困惑。基本上我在目录和文本文件中都有一个文本文件，我在每一行都添加了不同的文本。我试图用它来计算该文本文件中有多少行。我使用IsolatedStorageFile来执行此操作，这就是我访问它的方式。

到目前为止，我已经解决了这个问题，但它无法正常工作：

Using isoComments As IsolatedStorageFileStream = New IsolatedStorageFileStream("textfile1.txt", FileMode.Open, isoStore)
        Using readerComments As StreamReader = New StreamReader(isoComments)
            For Each line In readerComments.ReadLine
                MessageBox.Show(line.ToString.Count)
            Next
        End Using
End Using

结果不是行数，而是每行中的字符数。这不是我想要的，我想要特定文本文件中的行数。是否有人能够帮助我。

Answer 1

这样的事情：

Dim iLineCount As Integer
iLineCount = 0

Using isoComments As IsolatedStorageFileStream = 
New IsolatedStorageFileStream("textfile1.txt", FileMode.Open, isoStore)
    Using readerComments As StreamReader = New StreamReader(isoComments)
        For Each line In readerComments.ReadLine
            iLineCount=iLineCount+1
        Next
        MessageBox.Show(iLineCount)
    End Using
End Using

Answer 2

所以我设法解决了这个问题。我最初的想法是获取文本文件编辑的次数，所以我想在该文本文件的每一行中添加一些东西并计算每一行会有所帮助但我找不到方法。

我所做的是我添加了一个计数器，每次保存时它会增加1，然后当它被读取时会增加+1。这样我编辑的确切次数，因为每次编辑文本文件时，如前所述，它会像计数器一样增加1.因此，如果用户编辑了大约12次文本文件，那么将会有12位数字。当ser决定再次编辑文本文件时，将会读取该文件，一旦他将+1保存到12将被添加为13。

我用这个方法做一个增量：

Using isoStream As IsolatedStorageFileStream = New IsolatedStorageFileStream("textfile.text", FileMode.CreateNew, isoStore) Using writer As StreamWriter = New StreamWriter(isoStream)
      Dim i As Integer
      i += 1
      writer.WriteLine(i)
  End Using
End Using

计算文本文件中的每一行

2 个答案: