问题
填空题
下面程序的功能是统计字符串中"i"的个数,请填空。
Sub COU()
Dim n As Integer
a$="Beijing University of Technology"
n=Len(a$)
For i=1 To n
b$=Mid$(a$,i,1)
If ______ Then x=x+1
Next
Print "x=";x
End Sub
答案
参考答案:b$ ="i\
解析:[命题目的] 考查考生对If条件语句的应用情况。
[解题要点] 该语句的作用是判断每个字母是否为i,如果是则计数,否则不计数。
[错解分析] If语句是判断每个条件是否成立,第一次碰到条件成立的表达式,执行其后面的语句后退出If语句。
[考点链接] Visual Basic基础知识。