Question

我试图将信息附加到VB中的文本框中。我的应用程序允许用户选择各种选项，并在一个只读文本框中显示所有信息。

我想设置它，所以每当一个事件触发要在文本框中写入的内容时，它会被附加而不是覆盖当前框中的文本。

我在网上看到了一些解决方案，但很多这些解决方案似乎过于复杂。如果有人有一个简单的解决方案，将非常感谢。

唯一的限制是文本应作为新行追加，而不是直接在最后一句之后。

谢谢

Answer 1

Private Sub AddLine(ByVal line As String)
    Me.txtTheTextbox.Text = If(Me.txtTheTextbox.Text = String.Empty, line, Me.txtTheTextBox.Text & ControlChars.CrLf & line)
End Sub

Answer 2

text_read是一个只读文本框 text_live是一个普通的文本框

private sub text_live_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles text_live.TextChanged
text_read.text=text_read.text & text_live.Text ' append the text in live to read
end sub

Answer 3

我知道已经晚了8年，但是如果有人来这里提出同样的问题：您可以使用TextBox的“ AppendText”方法。

Dim newText As String = "add this text at the end!"
Me.myTextBox.AppendText(newText)

通过这种方式，newText被附加在myTextBox的结尾处，而不是替换整个文本。

将文本附加到文本框VB

3 个答案: