Question

从文本框输入的字符串，单击按钮统计出其中的字母，数字，空格和其他字符的个数。由不同的文本框显示个数

急！！！！！！
vb题 希望各位帮帮忙

Answer 1

我不会写VB代码，但是我可以给你提供一个思路。
任何字符都是有他的ASCII码和Unicode值，可以通过各种类型字符的这两个值的取值范围来判断是什么字符。
比如说0到9数字的Unicode值为48至57，可以通过这种方式来统计，用四个整型变量来计数各个字符的数量，并最终显示在页面的文本框中。

Answer 2

Private Sub Command1_Click()
Dim str As String, strTmp As String, intN As Integer, intM As Integer
Dim intX As Integer, intY As Integer, intZ As Integer, intW As Integer
str = Text1.Text
intN = Len(str)
For intM = 1 To intN
strTmp = UCase(Mid(str, intM, 1))
If IsNumeric(strTmp) Then '数字
intX = intX + 1
ElseIf Asc(strTmp) > 64 And Asc(strTmp) < 91 Then '字母
intY = intY + 1
ElseIf strTmp = " " Then '空格
intZ = intZ + 1
Else '其它
intW = intW + 1
End If
Next
Text2.Text = "数字个数为:" & intX
Text3.Text = "字母个数为:" & intY
Text4.Text = "空格个数为:" & intZ
Text5.Text = "特殊字符个数为:" & intW
End Sub