2. 计算机
  3. 下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。 Private Sub Commandl_Click() Dim Num(25)As Integer，Chr1 As String Chr1

下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是( )。 Private Sub Commandl_Click() Dim Num(25)As Integer，Chr1 As String Chr1

admin2018-09-19  25
问题 下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是(    )。
Private  Sub Commandl_Click()
Dim Num(25)As Integer，Chr1 As String
  Chr1=UCase(InputBox("请输入字母字符串"))
  For k=1 To Len(Chr1)
     n=Asc(Mid(Chr1，k，1))-Asc("A")
     If n＞=0 Then
       Num(n)=Num(n)+1
     End If
      Next k
      m=Num(0)
      For k=1 To 25
      If m＜Num(k)Then
      m=Num(k)
    End If
    Next k
    Print m
End Sub
选项 A、3
B、2
C、1
D、0
答案A
解析 该程序的第一个循环是遍历整个字符串，其中数组Num的作用是存放对应字符的出现次数；第二个循环的作用是找到数组Num中的最大值，所以整个程序的功能就是找到在输入字符串中出现次数最多的字母，并输出其出现的次数。
转载请注明原文地址:https://jikaoti.com/ti/mHm0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)