如何将 VScrollBar 添加到文本框?

Aft*_*ZHD -2 vb.net winforms

我正在为我的应用程序使用来自网络的主题vb.net,并且textbox没有滚动条或滚动条属性。该主题确实附带了VScrollBar Control,但我不知道如何向其添加代码以使其像平常一样滚动文本框。谁能帮我?

这些都是Custom Controls

It's a Windows Form. (WinForms)

文本框及其属性:

在此输入图像描述

ASt*_*her 6

可以添加垂直滚动条来TextBox形成对象,但它们必须Multiline

在此输入图像描述

Multiline这可以通过设置toTrueScrollBarsto来完成Vertical

在此输入图像描述

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

TextBox1.Multiline = True
TextBox1.ScrollBars = ScrollBars.Vertical
Run Code Online (Sandbox Code Playgroud)

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

在此输入图像描述

请记住,您应该:

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

在此输入图像描述

代码:

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
Run Code Online (Sandbox Code Playgroud)