[填空题] 已知B的ASCII码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数 Dim【 】 For i=65 To 90 pp(i) =0 Next x$=InputBox("Enter a string",x$) x$=UCase$(x$) For i=1 To【 】 n=Asc(Mid$(x$,i,1)) If n >=65 And n <=90 Then 【 】 End If Next i For i=65 To 90 If pp(i) >0 Then Print Chr$(i);pp(i) End If Next
参考答案:
pp(65 To 90)问题解析:
程序中,在第一个空处定义了一个数组,从程序中反映出数组的下标的范围是65~ 90,在第二个空处有一个循环语句,决定了循环的次数,由于一次循环只处理一个字符,因此循环次数要与字符串的长度相等;而在第三个空处是统计相同字符出项的次数,因为相同字符的ASCII码也不同,因此利用字符的ASCII码作为数组的下标,下标相同者统计到同一个下表变量中,这样就实现了统计功能。

![[填空题] 已知B的ASCII码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数 Dim For i=65 To 90 pp(i) =0 Next x$=InputBox(& [填空题] 已知B的ASCII码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数 Dim For i=65 To 90 pp(i) =0 Next x$=InputBox(&](http://www.mshxw.com/aiimages/31/257864.png)
