2011-11-02 327 views
0

我使用Fileystemwatcher觀察網絡共享上的某個文件夾,並且不想計算文本框中的行數。VB.NET計算文本框中的行數

我有2個richtextboxes,第一個將顯示行號,第二個顯示更改/刪除/重命名文件。

我能夠顯示標籤中的行總數,但也想顯示在richtextbox中的行數,但問題是它將數字添加到當前,它需要添加數字在一個新隊。

希望圖像能解釋。

example image

Private Sub textFolderActiviteit_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles textFolderActiviteit.TextChanged 
    textFolderActiviteit.SelectionStart = textFolderActiviteit.Text.Length 
    textFolderActiviteit.SelectionLength = 0 
    textFolderActiviteit.ScrollToCaret() 
    textFolderActiviteit.Focus() 
    Dim currentLineIndex As Integer = textFolderActiviteit.GetLineFromCharIndex(textFolderActiviteit.SelectionStart) 
    Me.Label2.Text = String.Format("{0}", currentLineIndex + 1) 
    Me.textLineCount.Text = String.Format("{0}", currentLineIndex + 1 & vbCrLf) 
End Sub 

Private Sub textLineCount_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles textLineCount.TextChanged 
    textLineCount.SelectionStart = textLineCount.Text.Length 
    textLineCount.SelectionLength = 0 
    textLineCount.ScrollToCaret() 
    textLineCount.Focus() 
End Sub 

回答

0

也許我誤解的問題,但不能你只是把VbCrlf行號之前?

Me.textLineCount.Text = String.Format("{0}", vbCrLf & (currentLineIndex + 1).ToString()) 
+0

不工作,它仍然計數而不是添加1,2,3,4,5 – PandaNL

+0

所以你不想要1,2,3,4 ...你想1,2,4 ,8,16?或者是什麼? – N0Alias

+0

是的,我不想跟進,但看看圖像只是計數,而不是把新的行號放在一個新的行。 – PandaNL