填空题
下面程序的功能是统计字符串中“广的个数,请填空。 Sub COU( ) a$="Beijing University of Technology" Dim n AS Integer n=Len(a$) For i=1 To n b$={{U}} 【12】 {{/U}} If{{U}} 【13】 {{/U}}Then x=x+1 Next i Print "x=";x End Sub
1、
【正确答案】
1、【12】Mid$(a$,i,1)
【答案解析】
【13】 b$ = "i" 解析:本题的思路是用截取字符函数Mid来逐个查找字符中a$中是否有“i"41字符,x记录“i”的总个数。如果满足条件语句b$="i"就执行x=x+1,然后输出。
提交答案
关闭