学习VB编程第27天，统计与分离字符串文本中的数字字母

视频加载中...

今天学习了刘金玉老师零基础VB教程的第34期，学习的主要内容是分离字符串文本中的数字字母等。

1.各种字符串类型文本的ascii码范围

0-9数字的ascii码范围是48-57

a-z小写字母的ascii码范围是97-122

A-Z大写字母的ascii码范围是65-90

2.思路：通过ASCII码值来判断，分别归类。使用字符长度函数len来统计数量。使用elseif来判断输入的字符ascii码范围。

3.范例：

①如图新建控件并设置好

②代码输入：

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii >= 48 And KeyAscii <= 57 Then

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

Label2.Caption = Len(Text2.Text)

ElseIf KeyAscii >= 97 And KeyAscii <= 122 Then

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

Label3.Caption = Len(Text3.Text)

ElseIf KeyAscii >= 65 And KeyAscii <= 90 Then

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

Label5.Caption = Len(Text4.Text)

Else

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

Label8.Caption = Len(Text5.Text)

End If

End Sub

③运行：请看前面视频

4.存在问题：一方面输入后错误内容删除后，分类统计仍然存在；另一方面，通过粘贴复制的内容无法进行分类统计。