在vb里面，当一行的代码过长时可以将该语句折断，规则是，空格+下划线
武清网站建设公司创新互联,武清网站设计制作，有大型网站制作公司丰富经验。已为武清1000多家提供企业网站建设服务。企业网站搭建\外贸网站建设要多少钱，请找那个售后服务好的武清做网站的公司定做！
例如，aaaabbbb
要在ab中间折断，
aaaa
_'空格然然加下划线，再换行，也就是按enter
bbbb
要是想让自己写的文字显示换行，可以在文件中间加ch(13),可实现此功能。
也不是不可以实现，只不过复杂一点而已，具体看下面代码。不过在需要换行等情况下的文本显示，还是建议用RichTextBox开启只读属性比较省心、比较合适。
Private Sub AutoNextRow()
'获取ListBox行集合文本
Dim length As Integer = (ListBox1.Items.Count - 1)
Dim items(length) As String '行文本数组
For i As Integer = 0 To length
items(i) = ListBox1.Items(i).ToString
Next
'处理ListBox换行
ListBox1.Items.Clear() '清空行内容
Using g As Graphics = Graphics.FromHwnd(ListBox1.Handle)
Dim result As New List(Of Object)
Dim w As Single = ListBox1.ClientSize.Width
Dim sf As SizeF, str As StringBuilder
For Each s As String In items
str = New StringBuilder
For i As Integer = 0 To (s.Length - 1)
sf = g.MeasureString(str.ToString s(i), ListBox1.Font)
If sf.Width w Then
result.Add(str.ToString)
str = New StringBuilder
End If
str.Append(s(i))
If i = s.Length - 1 Then result.Add(str.ToString)
Next
Next
ListBox1.Items.AddRange(result.ToArray) '填充行内容
End Using
End Sub
1、vb6中用鼠标拖放文本框大小。
2、vb6的文本框让文本自动换行的方法是设置它的MultiLine属性为true.
3、vb6全称全称为VisualBasic 6.0，是微软公司推出的可视化编程工具MSDN之一，是目前世界上使用最广泛的程序开发工具。如果你是一个对编程一无所知，而又迫切希望掌握一种快捷实用的编程语言的初学者，那选择VB 6.0没错的。即使考虑到VB程序本身编译和运行效率较低的不足(嘻嘻速度现在不是问题吧)，单是它的快捷的开发速度，简单易学的语法，体贴便利的开发环境，它仍不失一款优秀的编程工具，是初学者的首选。
在属性栏里把multiLine选为 ture，就可以实现自动换行；
MultiLine 属性（应用于TextBox）
返回或设置一个值，该值指示 TextBox 控件是否能够接受和显示多行文本。在运行时是只读的。
语法
object.MultiLine
object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。
设置值
MultiLine 属性设置值有：
设置值 描述
True 允许多行文本。
False （缺省值）忽略回车符并将数据限制在一行内。
Label本身具备换行功能。
（1）在设计时，如果显示内容比较长，调整Label大小，显示的内容随着Label的大小，自动调整并换行，如下图所示
（2）运行时，使用vbCrlf 也可以实现Label换行
Option Explicit
Private Sub Form_Load()
Label1.BackColor = H80FFFF
Label1.WordWrap = False
Label1.Caption = "第1行" + vbCrLf + "第2行" + vbCrLf + "第3行"
End Sub
