[填空题] 已知B的ASCⅡ码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数。 Dim [10] Fori=65 To 90 pp(i)=0 Next x$=InputBox(&qu

16 查阅

[填空题] 已知B的ASCⅡ码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数。
Dim [10]
Fori=65 To 90
pp(i)=0
Next
x$=InputBox("Enter a string",K$)
x$=U Case$(x$)
Fori=1 To Len(x$)
n=Asc(Mid$(x$,i,1))
If n>=65Andn<=90Then
[11]
End If
Nexti
Fori=65 To 90
If pp(i)>Then
Print Chr$(i);pp(i)
End If
Next

参考答案:

PP(n)=PP(n)+1

计算机考试