非常急!!!在线等!!!

xiaoyu4446 2003-11-21 01:45:21
我想取一个label中的文本的个数,就是说比如:label.caption="我们",可以返回文字的个数为2,有什么办法吗?然后再设定text1.text文本的个数,使得在text1.text的数据再label.caption中显示
...全文
25 15 打赏 收藏 转发到动态 举报
写回复
用AI写文章
15 条回复
切换为时间正序
请发表友善的回复…
发表回复
xiaoyu4446 2003-11-21
  • 打赏
  • 举报
回复
救命啊
xiaoyu4446 2003-11-21
  • 打赏
  • 举报
回复
可是我的数据是这样的,原来的label中什么都没有,我现在要通过写text中的东西传到label中,label.width可随意定,但是我想输入不超过label.width长度的字,这要怎么办??
dysqw 2003-11-21
  • 打赏
  • 举报
回复
自动会调整的呀?
xiaoyu4446 2003-11-21
  • 打赏
  • 举报
回复
如果字体变了怎么办?
dysqw 2003-11-21
  • 打赏
  • 举报
回复
l=len( label1.caption)
text1.maxlength=l
我不知道这样作有什么意义?
要label1能完整显示内容 可以设置 autosize =true 就可以了
xiaoyu4446 2003-11-21
  • 打赏
  • 举报
回复
可是我用得怎么不行,我写的是len(label12.caption),都是红字啊
ipman 2003-11-21
  • 打赏
  • 举报
回复
vb内部都是用unicode,所以1楼的不会错的拉
kimurakenshin 2003-11-21
  • 打赏
  • 举报
回复
一楼的写的很对.

你如果想只知道中文字符,那就判断不是已知ASCII码的就是中文.
xiaoyu4446 2003-11-21
  • 打赏
  • 举报
回复
而且字体还是可变的
xiaoyu4446 2003-11-21
  • 打赏
  • 举报
回复
一楼的不行,二楼的不大明白
kimurakenshin 2003-11-21
  • 打赏
  • 举报
回复
楼上的不太对呀,如果是随机输入的怎么办?不知道有几个中文字符几个英文字符的情况怎么办?
xiaoyu4446 2003-11-21
  • 打赏
  • 举报
回复
我只要求汉字的个数
Freaky 2003-11-21
  • 打赏
  • 举报
回复
同意一楼的
sunxiaohui 2003-11-21
  • 打赏
  • 举报
回复
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="我"
祝好运
饮水需思源 2003-11-21
  • 打赏
  • 举报
回复
len(label.caption)
这样不知行不行?

7,770

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧