从键盘输入五个字符的字符串。统计其中字母、数字、符号、空格各多少个

Question

如题所述

Answer 1

VB code
Private Sub Command1_Click()
Dim zm As Integer, sz As Integer
Dim fh As Integer, kg As Integer
Dim i As Integer, s As String
For i = 1 To 5
s = Mid(Text1, i, 1)
Select Case Asc(s)
Case 65 To 90, 97 To 122
zm = zm + 1
Case 48 To 57
sz = sz + 1
Case 32
kg = kg + 1
Case Else
fh = fh + 1
End Select
Next
Print "sz="; sz, "zm="; zm, "fh="; fh, "kg="; kg

End Sub

Answer 2

java？
按字符读取，判断是字母还是数字，分别用单独的计数器记录，然后输出

Answer 3

#include <iostream>
using namespace std;
void main ()
{
char x;
cout<<"请输入一串英文字母、空格、数字和其他的字符：";
int number=0,space=0,others=0,letter=0;
while((x=getchar())!='\n')
{
if((x>=65&&x<=90)||(x<=122&&x>=97)) letter++;
else if (x==32) space++;
else if (x>=48&&x<=57) number++;
else others++;
}
cout<<"number="<<number<<'\n'<<"space="<<space<<'\n'<<"letter="<<letter<<'\n'<<"others="<<others<<endl;
}