在VB中設計一個帶有垂直滾動條的文本框很簡單。你可以在VB的窗體設計器中添加一個文本框控件，然后將其屬性中的ScrollBars屬性設置為Vertical，這樣就會在文本框的右側添加一個垂直滾動條。
另外，你也可以在代碼中動態添加垂直滾動條。下面是一個簡單的示例代碼：
Private Sub Form_Load()
' 創建一個文本框
Dim txtBox As TextBox
Set txtBox = Me.Controls.Add("Forms.TextBox.1", "txtBox")
' 設置文本框的屬性
With txtBox
.Top = 100
.Left = 100
.Width = 200
.Height = 200
.MultiLine = True
.ScrollBars = fmScrollBarsVertical
End With
End Sub
通過以上代碼，你可以在窗體加載時動態添加一個帶有垂直滾動條的文本框。希望對你有所幫助！
