下面程序的功能是统计字符串中"i"的个数，请填空。 SubCOU（） a$="BeijingUniversityofTec

下面程序的功能是统计字符串中"i"的个数，请填空。

Sub COU（）

a$="Beijing University of Technology"

Dim n As Integer

n=Len（a$）

For i=1 To n

b$= 【12】

If 【13】 Then x=x + 1

Next i

Print "x="; x

End Sub