求助vb] label1控件的caption属性能输入多少字符串呢
我做了Label1控件的caption属性的字符串移动的方法全部读取的过程,
问题是caption的字符串较少的时候都可以。但是过多时,其后的部分不能显示出来了
caption的字符串能允许多少字符串呢
什么方法能够解决呢
[解决办法]
1、标签直接用字符串显示不了多少:在IDE下,会自动换行,换了行的不行,这个可以数出来.
如,label1.caption="sdfgsdfgsdfgsdfg"
2、标签显示文本框的内容:可达64k
Label1.Caption = Text1.Text Debug.Print LenB(Label1.Caption)
[解决办法]
如果条件许可可以容纳最大28000单字节字符串:
Option Explicit Dim a As String Dim i As Integer Dim b As StringPrivate Sub Command1_Click() a = "abcdefghijklmnopqrstuvwxyt" For i = 1 To 2000 b = b + a & vbCrLf Next i Label1.Caption = b Text1 = Len(Label1.Caption)End SubPrivate Sub VScroll1_Change() Label1.Top = VScroll1 * -100End Sub
[解决办法]
Dim s As Strings = "afjrgeognbdlhnlrt"Label1.Width = Me.TextWidth(s)Label1.Caption = s