vb中label自动换行的方法

来源：百度知道 编辑：UC知道 时间：2024/06/04 14:02:07
程序中，用label.caption显示内容。点击command1后在label中显示相应text内容，再次点击command后，在label中显示新输入的text的内容，且在label中换行输出，并不覆盖原来的内容。怎样实现？大侠帮下忙，谢了！

Dim a() As String ‘定义一个数组
Private Sub Command1_Click()
a() = Split(Text1.Text, vbCrLf)'以Text1的回车符分割Text1的内容。
For b = 0 To UBound(a) '从0到数组a的最大数字
Label1.Caption = Label1.Caption & vbCrLf & a(b) '一行一行输入Label1。这里有一个重点，就是输入回车用vbCrLf，这是回车符。
Next ’结束循环
End Sub

VB6.0中可以通过对Label控件的WordWrap 属性设置，满足汉字和字母文本换行。

  • WordWrap 属性

返回或设置一个值，该值用来指示一个 AutoSize 属性设置为 True 的 Label 
控件，是否要进行水平或垂直展开以适合其 Caption 属性中指定的文本的要求。

为了决定 Label 控件如何显示其内容，应使用此属性。例如，一个动态改变的图形可能具有一个包含的文本也发生改变的 
Label。为了使 Label 保持水平方向尺寸不变并允许增加或减少文本，则应将 WordWrap 和 
AutoSize 属性设置为 True。

  • AutoSize 属性，返回或设置一个值，以决定控件是否自动改变大小以显示其全部内容。

vb label 自动换行 VB中label控件的文字换行 关于VB中Label控件无法换行的问题 java的label中如何实现换行输出？ vb中label的caption问题. 百度回答中自动换行、插入超链接的方法 VB 文本框自动换行 关于VB中Label的问题!VB高手帮帮忙 label的换行问题 vs2005 c# VB中怎么换行