vb.net 中TextBox 有100行数据 光标一直放于最后一行

在 VB.NET 中，你可以使用 TextBox 控件的 SelectionStart 和 ScrollToCaret 方法来实现将光标一直放于最后一行的效果。具体的实现步骤如下：

1. 将 TextBox 的 Multiline 属性设置为 True，以允许显示多行文本。

2. 在需要更新 TextBox 中文本的地方，将文本赋值给 TextBox，并将 SelectionStart 属性设置为文本末尾的位置，然后调用 ScrollToCaret 方法将光标移动到末尾位置，示例代码如下：

TextBox1.Text = "你的文本内容"
TextBox1.SelectionStart = TextBox1.TextLength
TextBox1.ScrollToCaret()

3. 如果你需要在 TextBox 中添加新的文本行，可以使用以下代码来实现自动将光标移动到最后一行的效果：

TextBox1.AppendText("你的新文本行" + vbCrLf)
TextBox1.SelectionStart = TextBox1.TextLength
TextBox1.ScrollToCaret()

这样，就可以实现将光标一直放于最后一行的效果了。

相关问题

vb.net 中TextBox 有100行数据 只显示最后几行

在 VB.NET 中，你可以使用 TextBox 控件的 SelectionStart 和 SelectionLength 属性来实现只显示最后几行数据的效果。具体的实现步骤如下：

1. 将 TextBox 的 Multiline 属性设置为 True，以允许显示多行文本。

2. 在需要更新 TextBox 中文本的地方，使用以下代码来将光标移动到最后一行：

TextBox1.SelectionStart = TextBox1.TextLength
TextBox1.ScrollToCaret()

3. 然后，使用以下代码来截取并显示最后几行文本：

Dim lines() As String = TextBox1.Text.Split(vbCrLf)
Dim startIndex As Integer = Math.Max(lines.Length - 5, 0) ' 只显示最后 5 行
Dim sb As New StringBuilder()
For i As Integer = startIndex To lines.Length - 1
    sb.AppendLine(lines(i))
Next
TextBox1.Text = sb.ToString()

这样，就可以实现只显示最后几行文本的效果了。

vb.net 多次向TextBox输入多行数据 一直显示最后几行

要在 VB.NET 中向 TextBox 控件输入多行数据，并且只显示最后几行，可以使用以下代码：

' 定义变量，表示要保留的行数
Const MAX_LINES As Integer = 5

' 向 TextBox 添加新行
TextBox1.AppendText("新行1" & vbCrLf)
TextBox1.AppendText("新行2" & vbCrLf)
TextBox1.AppendText("新行3" & vbCrLf)

' 如果 TextBox 中的行数超过了 MAX_LINES，则删除前面的行
Do While TextBox1.Lines.Length > MAX_LINES
    Dim lines As String() = TextBox1.Lines
    lines = lines.Skip(lines.Length - MAX_LINES).ToArray()
    TextBox1.Lines = lines
Loop

上述代码中，`MAX_LINES` 变量表示要保留的行数。首先，使用 `AppendText` 方法向 TextBox 添加新行。然后，使用 `Lines` 属性获取 TextBox 中的所有行，如果行数超过了 `MAX_LINES`，则使用 LINQ 中的 `Skip` 方法删除前面的行，再使用 `Lines` 属性将剩余的行设置回 TextBox 中。

注意，这段代码应该放在每次添加新行之后执行，以确保 TextBox 中只保留最后几行。