[填空题] 下面程序的功能是统计字符串中“i”的个数,请填空。
Sub COU( )
Dim n As Integer
a$ = "Beijing University of Technology"
n = Len(a$ )
For i = 1 To n
b$ =Mid$(a$,i, 1)
If 【11】 Then x=x + 1
Next
Print "x ="; x
End Sub
[填空题] 下面程序的功能是统计字符串中“i”的个数,请填空。
Sub COU( )
Dim n As Integer
a$ = "Beijing University of Technology"
n = Len(a$ )
For i = 1 To n
b$ =Mid$(a$,i, 1)
If 【11】 Then x=x + 1
Next
Print "x ="; x
End Sub
b$="i
该语句的作用是判断每个字母是否为i,如果是则计数,否则不计数。
VIP截止日期:2025-01-02 00:18:20
←请使用支付宝扫码支付VIP截止日期:2025-01-02 00:18:20
←请使用微信扫码支付