问题
填空题
下面程序的功能是统计字符串中“i”的个数请填空。 Sub COU( ) Dim n As Integer a$ =" Beijing University of Technology" n = Len(a$) For i = 1 To nb$ = 【15】 If b$ ="i" Then x=x+1 Next Print" x="; x End Sub
答案
参考答案:Mid$(a$,i,1) b$=“i”
解析: 从字符串中依次截取每一个字母看是不是i,来统计i的个数,用Mid$(字符串,P,n)函数是从第p个字符开始,向后截取n个字符。