问题 填空题

下面程序的功能是统计字符串中"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基础知识。

单项选择题
问答题 简答题