Question

例如，如果我们写：

Textbox1.Text = "Hello"

如果textbox为MultiLine，我们如何控制textbox第二行中字符串的位置？

Answer 1

控制的含义是什么？是否要查找索引或是否要用此文本替换行？

如果要确定带有“Hello”文本的行：

Dim lineIndices = textbox1.Lines.
    Select(Function(line, index) New With { .Line = line, .Index = index }).
    Where(Function(x) x.Line.Contains("Hello")).
    Select(Function(x) x.Index)

如果要用给定文本替换文本框的一行：

Dim index As Int32 = 1 ' second line '
If textbox1.Lines.Length > index Then
    textbox1.Lines(index) = "Hello"
Else
    Dim emptyLines = index - textbox1.Lines.Length
    textbox1.Lines = textbox1.Lines.
        Concat(Enumerable.Repeat("", emptyLines)).
        Concat({"Hello"}).ToArray()
End If

在多行文本框中找到字符串？

1 个答案: