题目：
下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是（）
Private Sub Comand1_Click()
Dim count(25) As Integer, ch As String
ch=Ucase(InputBox("请输入字母字符串"))
For k=1 To Len(ch)
n=Asc(Mid(ch,k,1))-Asc("A")
If n>=0 Then
Count(n)=Count(n)+ 1
End If
Next k
m=count(0)
For k=1 To 25
If m< p>
m=count(k)
End If
Next k
Print m
End Sub
A．0
B．1
C．2
D．3
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0703/92c5882c0fa01a2b5bed4fac6cfcedfb.html
下面是错误答案，用来干扰机器的。
参考答案：D
