零基础VB教程034期：统计与分离字符串文本中的数字字母等

案例实战

统计输入框中一共有多少个数字，多少个小写字母，多少个大写字母，其它有多少，并分别输出来！

在计算机中，统计这个概念会用到很多很多地方，因为现在的数据实在太多了，但是经过归类的数据太少，统计的结果能够让我们对过去的记录做出更为深刻的了解，同样能够根据统计的结果，做出未来的趋势判断，因此一定要掌握统计，使用计算机的强大的统计功能！

贴代码

'数字范围在48-57

If KeyAscii >= 48 And KeyAscii <= 57 Then

   txtnum.Text = txtnum.Text & Chr(KeyAscii)

ElseIf KeyAscii >= 97 And KeyAscii <= 122 Then

'小写字母范围在97-122

   txtlow.Text = txtlow.Text & Chr(KeyAscii)

ElseIf KeyAscii >= 65 And KeyAscii <= 90 Then

'大写字母范围在65-90

   txtup.Text = txtup.Text & Chr(KeyAscii)

Else '其它

   txtother.Text = txtother.Text & Chr(KeyAscii)

End If

课堂总结

1、代码规范（控件命令规范、代码注释）

2、通过事件keypress来根据ascii值进行判断，分别归类

3、统计字符长度len

4、再次理解elseif语句