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

admin2009-03-15 60

问题下面程序的功能是统计字符串中“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) b$=“i”

解析从字符串中依次截取每一个字母看是不是i，来统计i的个数，用Mid$(字符串，P，n)函数是从第p个字符开始，向后截取n个字符。

转载请注明原文地址:https://www.kaotiyun.com/show/HD1p777K

本试题收录于：二级VB题库NCRE全国计算机二级分类