下面程序运行时,若输入“Visual Basic Prograrmming”,则在窗体上输出的是( )。Private Sub Command1Click( ) Dim cout(25)As Integer,ch As String ch=Ucase(Int,utBox("请输入字母字符串")) For k=1 To i en(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 m=count(k) End If Next k Print m End Sub