A-A+

下面程序的功能是统计字符串中i的个数请填空。 Sub COU() Dim n As I

2022-08-05 20:14:19 问答库阅读 171 次

问题详情

下面程序的功能是统计字符串中"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$I1)
Mid$(a$,I,1) 解析：从字符串中依次截取每一个字母看是不是i,来统计i的个数,用Mid$(字符串,p,n)函数是从第p个字符开始,向后截取n个字符。