非常急！！！在线等！！！

Question

我想取一个label中的文本的个数，就是说比如：label.caption="我们"，可以返回文字的个数为2，有什么办法吗？然后再设定text1.text文本的个数，使得在text1.text的数据再label.caption中显示

Answer 1

len(label.caption)
这样不知行不行？

Answer 2

Dim a As String, b As String, c As String
    a = "123我们"
    b = StrConv(a, vbFromUnicode)
    Debug.Print LenB(b)
    c = StrConv(MidB(b, 4, 2), vbUnicode)
    MsgBox c
打印出的长度为7
    c="我"
祝好运

Answer 3

一楼的写的很对.你如果想只知道中文字符,那就判断不是已知ASCII码的就是中文.

Answer 4

vb内部都是用unicode，所以1楼的不会错的拉

Answer 5

可是我用得怎么不行，我写的是len(label12.caption),都是红字啊

Answer 6

l=len( label1.caption)
text1.maxlength=l
我不知道这样作有什么意义?
要label1能完整显示内容 可以设置 autosize =true 就可以了

Answer 7

可是我的数据是这样的，原来的label中什么都没有，我现在要通过写text中的东西传到label中，label.width可随意定，但是我想输入不超过label.width长度的字，这要怎么办？？