0

我已阅读这篇文章 将背景颜色应用于整行文本

这正是我需要的,但我使用的是 VB.NET,问题是:我应该如何在 VB.NET 中应用那个“listitem 集合”?

任何帮助表示赞赏。此致

4

1 回答 1

0

@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
于 2013-06-06T12:22:04.893 回答