下面程序的功能是统计字符串中"i"的个数,请填空。 Sub COU( ) Dim n As Integer a$=" Beijing University of Technology" n=Len(a$) For i=1 To n

admin2010-11-20  39

问题 下面程序的功能是统计字符串中"i"的个数,请填空。
Sub COU( )
Dim n As Integer
    a$=" Beijing University of Technology"
n=Len(a$)
For i=1 To n
    b$=【  】
    If b$="i" Then x=x+1
Next
Print"x=" ; x
End Sub

选项

答案Mid$(a$,I,1)

解析 从字符串中依次截取每一个字母看是不是i,来统计i的个数,用Mid$(字符串,p,n)函数是从第p个字符开始,向后截取n个字符。
转载请注明原文地址:https://jikaoti.com/ti/TbO0FFFM
0

最新回复(0)