如何将VScrollBar添加到文本框?

时间:2015-06-01 18:33:28

标签: vb.net winforms

我在网上为我的vb.net应用程序使用主题,而textbox没有滚动条或滚动条属性。主题确实带有VScrollBar Control,但我不知道如何为其添加代码以使其像正常情况一样滚动文本框。任何人都可以帮助我吗?

这些是Custom Controls

It's a Windows Form. (WinForms)

文本框及其属性:

enter image description here

1 个答案:

答案 0 :(得分:1)

可以将垂直滚动条添加到TextBox表单对象,但是必须Multiline

enter image description here

这可以通过将Multiline设置为True而将ScrollBars设置为Vertical来完成:

enter image description here

或者它可以通过代码以编程方式完成,如本身所示:

TextBox1.Multiline = True
TextBox1.ScrollBars = ScrollBars.Vertical

您可以将ScrollBars设置为仅水平,垂直,两者或无(默认):

enter image description here

请记住,你应该:

  • 如果您要将文本框的内容发送到数据库,请清理用户的输入
  • 限制用户可以输入的字符数量(见下文)
  • 通过正确命名对象来使用proper programming technique,例如,尽量不要为文本框命名TextBox1

如上所述,您可能希望显示用户可以输入的字符数量,例如:

enter image description here

此代码:

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    text1.MaxLength = 140
    charsLeft.Text = "0/" + CStr(text1.MaxLength)
End Sub

Private Sub textHasChanged() Handles text1.TextChanged
    charsLeft.Text = CStr(text1.TextLength) + "/" + CStr(text1.MaxLength)
End Sub