问题
单项选择题
执行下面的程序，输出的结果是 ______ 。Private Sub Command1_Click()ch $ = "Welcome to China!"n = Len(ch $ )For i =1 To n-1 s$ =Mid(ch$ ,i,1) If s$ ="o" Then m=m + 1Next iPrint mEnd Sub
A．1
B．2
C．8
D．0
答案
参考答案：B
解析： 此题的功能是统计字母。在字符串中出现的次数。注意两个字符串函数的使用：Len()求字符中中字符的个数，Mid()是取子串。此题即依次取串中的字符，逐个与字母。进行比较，如果相等，则对计数变量m加1。