问题
填空题
下面程序的功能是统计字符串中“i”的个数,请填空。 Sub COU( ) Dim n As Integer a$ = "Beijing University of Technology" n = Len(a$ ) For i = 1 To nb$ =Mid$(a$,i, 1)If 【11】 Then x=x + 1 Next Print "x ="; x End Sub
答案
参考答案:b$="i"
解析: 该语句的作用是判断每个字母是否为i,如果是则计数,否则不计数。