VB中怎么换行

       

     有时候我们需要显示多行数据，使其更有逻辑性。下面我就说一下VB中的换行问题

     现在我们将换行的环境分为三种：窗体输出，文本框（Text）输出，标签（Label）输出

一、在窗体输出中

         换一行：Chr（13） 、Chr（10） 、 Chr（13）+Chr（10） 

         换两行：Chr（10）+Chr（13）、两个Chr（13）、两个Chr（10）

                  

二、在文本框输出中

         换一行：Chr(13)+Chr(10)，其他没有了

         换两行：没有，除非第二行为空，即“”

三、在标签输出中

         换一行：Chr(10),Chr(13),以及所有的组合，都可以换一行，也都只能换一行

         换两行：没有，除非第二行为空，即“”

下面我们来举个例子：

Private Sub Command1_Click()

    '在窗体上换行
    Print "我" & Chr(10) & _
          "是" & Chr(13) & _
          "十" & Chr(13) & Chr(10) & _
          "期" & Chr(10) & Chr(13) & _
          "崔" & vbNewLine & _
          "晓" & vbCrLf & _
          "光"
          
    '在文本框中换行
    Text1.Text = "我" & Chr(10) & _
                "是" & Chr(13) & _
                "十" & Chr(13) & Chr(10) & _
                "期" & Chr(10) & Chr(13) & _
                "崔" & vbNewLine & _
                "晓" & vbCrLf & "" & vbCrLf & _
                "光"
                
    '在标签中换行
    Label1.ForeColor = vbRed
    Label1.Caption = "我" & Chr(10) & _
                     "是" & Chr(13) & _
                     "十" & Chr(13) & Chr(10) & _
                     "期" & Chr(10) & Chr(13) & _
                     "崔" & vbNewLine & _
                     "晓" & vbCrLf & "" & vbCrLf & _
                     "光"
End Sub

其运行的效果图为

在VB中Chr(10)和Chr(13)还有如下表示，他们的用法一样，这里就不再重复了