在使用使用文本框显示或录入一段很长的文本时，需要将文本框设置成多行显示，否则文本内容只能在一行中显示，示例代码如下：

#001  Private Sub UserForm_Initialize()
#002      With TextBox1
#003          .WordWrap = True
#004          .MultiLine = True
#005          .Text = Space(4) & "VBA(Visual Basic for Application)是" _
#006                  & "微软公司为了加强Office软件的二次开发能力而附加" _
#007                  & "于其中的编程语言。VBA的确非常强大，其与VB完全一" _
#008                  & "致的语法结构，高效控制Office对象模型的能力，令无" _
#009                  & "数人为之折腰。利用VBA，几乎可以在Office里面做任何" _
#010                  & "其他程序能做的事情。但是，应该清楚的认识到VBA是依" _
#011                  & "托其宿主─—Excel（或其他Office组件）而存在的，对" _
#012                  & "于Excel用户来讲，VBA只不过是锦上添花的东西，切不可" _
#013                  & "本末倒置，捡了芝麻丢了西瓜，把明明能够利用Excel内置" _
#014                  & "功能完成的任务，硬是搬到VBA里面去做，以为用代码实现" _
#015                  & "就是高人一头的表现。其实，真正的高手，会尽量发挥" _
#016                  & "Excel自身的威力，不到万不得已的时候是不会去<Alt+F11>的。"
#017      End With
#018  End Sub

代码解析：
       窗体的Initialize事件过程，在窗体显示时将文本框设置成多行显示文本。
       第3行代码设置文本框的WordWrap属性。WordWrap属性指定一个控件的内容在行末是否自动换行，语法如下：
object.WordWrap [= Boolean]
       参数object是必需的，一个有效的对象。
       参数Boolean是可选的，控件是否扩展以适应文本的大小，设置为True，文本换行，设置为False，文本不换行。
       第4行代码设置文本框的MultiLine属性。MultiLine属性规定控件能否接受和显示多行文本，语法如下：
object.MultiLine [= Boolean]
       参数object是必需的，一个有效的对象。
       参数Boolean是可选的，控件是否支持多行文本，设置为True，以多行显示文本，设置为False，不多行显示文本。如果将多行文本框的MultiLine属性设置为False，则文本框的所有字符都将合并为一行，包括非打印字符（如，回车和换行）。
       对于既支持WordWrap属性又支持MultiLine属性的控件，当MultiLine属性为False时，WordWrap属性被忽略。
       运行窗体，文本框显示如图所示。

文本框的自动换行