VB中怎么换行

来源:互联网 发布:vb程序设计教程答案 编辑:程序博客网 时间:2024/04/30 12:12

       

     有时候我们需要显示多行数据,使其更有逻辑性。下面我就说一下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)还有如下表示,他们的用法一样,这里就不再重复了

 


原创粉丝点击