textbox 多行显示,显示垂直滚动条,并显示最后一行
TextBox15.Multiline = True '设置多行显示
TextBox15.ScrollBars = ScrollBars.Vertical '添加垂直滚动条
TextBox15.WordWrap = False '自动换行,关闭,(默认是开启的)
'textbox显示最后一行
Private Sub textbox_showlast(tb As TextBox)
If tb.Text.Length > 0 Then
tb.SelectionStart = tb.Text.Length - 1
tb.ScrollToCaret()
End If
End Sub