vb.net - RICHTEXTBOX の各行の代替色 (BACKCOLOR) (FORECOLOR ではない)

Question

この記事を読みました テキストの行全体に背景色を適用する

これはまさに私が必要としているものですが、私は VB.NET を使用しています。問題は、VB.NET でその「listitem コレクション」をどのように適用すればよいですか?

どんな助けでも大歓迎です。よろしくお願いします

Answer 1

@Hans Passantはい、そうです、コードを変更しました。今は動作します。

    Dim Linez As String() = New String(boxitem.Lines.Length - 1) {}
    For i As Integer = 0 To boxitem.Lines.Length - 1
        Linez(i) = boxitem.Lines(i) + New String(" ", 80)
    Next
    boxitem.Clear()
    boxitem.Lines = Linez        
For i As Integer = 0 To boxitem.Lines.Length - 1
        Dim Linez1 As Integer = boxitem.GetFirstCharIndexFromLine(i)
        boxitem.[Select](Linez1, boxitem.Lines(i).Length)
        boxitem.SelectionBackColor = If((i Mod 2 = 0), Color.MistyRose, Color.Bisque)
    Next
    Try 
boxitem.Select(boxitem.GetFirstCharIndexFromLine(boxitem.Lines.Length - 1), 
boxitem.Lines(boxitem.Lines.Length - 1).Length)
    Catch ex As Exception
    End Try