Question

编写一个程序，从键盘上输入一串字符串，分别统计字符串中大写字母，小写字母，数字的个数

Answer 1

java 语言可以么？
import java.util.*;
public class charc {
public static void main(String[] args) {
int letter=0,digit=0,space=0;
Scanner sc=new Scanner(System.in);
System.out.println("请输入一行字符");
String str=sc.nextLine();
char[] ch=str.toCharArray();
for(int i=0;i<ch.length;i++){
if(Character.isDigit(ch[i])){
digit++;
}
if(Character.isLetter(ch[i])){
letter++;
}
if(Character.isSpaceChar(ch[i])){
space++;
}
}
System.out.println("输出有有"+digit+"个数字");
System.out.println("输出有有"+letter+"个字母");
System.out.println("输出有有"+space+"个空格");

}

}
运行结果如下：
请输入一行字符
qre 123 r
输出有有3个数字
输出有有4个字母
输出有有2个空格

Answer 2

用什么语言编写呢？

追问

vb语音

vb程序设计

追答

Sub 统计键盘输入()
   Dim S$, I%, N1%, N2%, N3%
   Do
      S = InputBox("请键入要统计的字母或数字，不键入时退出")
      If S = "" Then Exit Do
      For I = 1 To Len(S)
         If Mid(S, I, 1) Like "[A-Z]" Then
            N1 = N1 + 1
         ElseIf Mid(S, I, 1) Like "[a-z]" Then
            N2 = N2 + 1
         ElseIf Mid(S, I, 1) Like "[0-9]" Then
            N3 = N3 + 1
         End If
      Next
      MsgBox "在 " & S & " 中" & Chr(13) & "大写字母：" & N1 & Chr(13) & "小写字母：" & N2 & Chr(13) & "数字字符：" & N3
   Loop
End Sub