Question

VB 用textbox 输入字符串 计算长度

我在VB中插入两个textbox，一个命名为“input”，一个命名为“number”。我想在input里面出入一个字符串，然后在number里面显示字符串长度。我写了个程序（如图），每次字符串返回值都是10。这个是为什么，或者正确的程序应该怎么写？





Answer 1

vb中input是保留字，所以给空间命名的时候不要使用

我是用的 text1 和 text2 ，把 len（）函数里边的双引号去掉就可以了。但是你的是input所以会出错，改了就行了
Private Sub text1_Change()
num = Len(text1.Text)
text2.Text = num
End Sub

追问

我试过了，在运行的时候就报错了·

Answer 2

num = Len("input.text") 返回的是"input.text"这个字符串的长度！你自己算算"input.text"是不是10个字符？！
正确的应该是
num =Len(input.Text)

追问

我试过了，在运行的时候就报错了·

追答

input是系统保留字（是VB的内部函数名及命令名），不能用作控件名称，你可以改为Input1或其他。建议你尽量不要用单个的英文单词做名称，一不小心就可能与保留字发生冲突，可以用单词+数字的方式，或者用拼音字母

Answer 3

Len("input.text")计算的是"input.text"这10个字符的字符串长度，所以都是10。
把它改成Len(input.text)应该就OK了~~

Answer 4

把"input.text"
改为
input.text

返回10的原因是input.text是10个字符的。
你要返回input.text的内容，不是"input.text"这个字符串

追问

我试过了，在运行的时候就报错了·

追答

你把控件的名字由input改为txtinput试试
或者重新新建一个控件，用原来的名字text1.text试试

Answer 5

采纳标准答案吧。
肯定是10啊，你数一下input.text这是不是10个字母？
要变成
num=Len(input.text)

追问

我试过了，在运行的时候就报错了·

追答

a=input.text
number.text=len(a)