vb] label1控件的caption属性能输入多少字符串呢

求助vb] label1控件的caption属性能输入多少字符串呢

我做了Label1控件的caption属性的字符串移动的方法全部读取的过程，

问题是caption的字符串较少的时候都可以。但是过多时，其后的部分不能显示出来了

caption的字符串能允许多少字符串呢

什么方法能够解决呢

------解决方案--------------------
1、标签直接用字符串显示不了多少：在IDE下，会自动换行，换了行的不行，这个可以数出来.
如，label1.caption="sdfgsdfgsdfgsdfg"
2、标签显示文本框的内容：可达64k

VB code

Label1.Caption = Text1.Text
   Debug.Print LenB(Label1.Caption)

------解决方案--------------------

如果条件许可可以容纳最大28000单字节字符串：

VB code


Option Explicit
    Dim a As String
    Dim i As Integer
    Dim b As String
Private Sub Command1_Click()
    a = "abcdefghijklmnopqrstuvwxyt"
    For i = 1 To 2000
        b = b + a & vbCrLf
    Next i
    Label1.Caption = b
    Text1 = Len(Label1.Caption)
End Sub

Private Sub VScroll1_Change()
    Label1.Top = VScroll1 * -100
End Sub

------解决方案--------------------

VB code


Dim s As String

s = "afjrgeognbdlhnlrt"
Label1.Width = Me.TextWidth(s)
Label1.Caption = s

vb] label1控件的caption属性能输入多少字符串呢

相关推荐