VB中怎么换行

前端之家收集整理的这篇文章主要介绍了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)还有如下表示,他们的用法一样,这里就不再重复了

猜你在找的VB相关文章