一看你就是从别处抄的代码
![[滑稽]](/static/emoticons/u6ed1u7a3d.png)
那个出处我看了,原来是显示在三个标签里的,你想改成显示在一个文本框里,但是自己又不知道怎么改,是吧?
这么改就可以:
Text2.Text = "数字:" & numcount & vbCrLf _
& "大写字母:" & uppercount & vbCrLf _
& "小写字母:" & lowercount
注意这三行其实是一句代码,只是中间用续行符(一个空格加一个下划线)隔开了,这是因为这句代码太长了,放在一行可能会显示不完整(如果你代码窗口不够大的话),所以就分成好几行来写了;如果你不嫌这句代码长,把下划线去掉,写成一行,也是可以的