VB程序设计: 设计程序，窗体上包含一个文本框和一个标签，当在文本框输入字符串时，能够将字符串的有

VB程序设计: 设计程序，窗体上包含一个文本框和一个标签，当在文本框输入字符串时，能够将字符串的有效长度显示在标签中

不行啊

有问题？你要的是下面这样的效果吗？
Private Sub Text1_Change()
s = Text1
k = Len(s)
For i = 1 To k
If Mid(s, i, 1) " " Then m = m + 1
Next
Label1 = m
End Sub