首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。 Private Sub Command1_Click() Dim NDin(25)As Integer,Chr1 As Stri
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。 Private Sub Command1_Click() Dim NDin(25)As Integer,Chr1 As Stri
admin
2017-04-26
89
问题
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。
Private Sub Command1_Click()
Dim NDin(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
m=Nam(k)
End If
Next k
Print m
End Sub
选项
A、3
B、2
C、1
D、0
答案
A
解析
该程序的第一个循环是遍历整个字符串,其中数组Num的作辟是存放对应字符的出现次数;第二个循环的作用是找到数组Num中的最大值,所以整个程序的功能就是找到在输入字符串中出现次数最多的字母,并输出其出现的次数。
转载请注明原文地址:https://kaotiyun.com/show/4UGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
运行以下程序后,输出的图形是PrivateSubCommand1_Click()Line(500,500)-(1000,500)Line(750,300)-(750,700)
把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintKeyCode;EndSubPriva
软件开发的结构化设计方法,全面指导模块划分的最重要的原则应该是______。
以下能够触发水平滚动条Change事件的操作是()
数据结构分为线性结构和非线性结构,带链的队列属于______。
有两个关系R和S如下:则由关系R得到关系S的操作是()。
设C盘根目录下有一文件名为“a1.txt”,若该文件还没有打开,现在要知道它的长度,可使用命令【】。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充完
对长度为n的线性表进行顺序查找,在最坏情况下需要比较的次数为()。
首先执行循环体,然后再进行条件判断,决定是否结束循环的循环语句是:【】。
随机试题
乙酰化法测定醇含量可消除伯胺和仲胺的干扰,在反应条件下伯胺和仲胺酰化为相应的酰胺,醇酰化为酯,用碱中和后,加入过量的碱,酯被定量地皂化,而酰胺不反应。()
杆式卡环的卡环臂应起于
中国会计学会是由全国会计领域各类专业组织及个人自愿结成的()社会组织。
期货公司总经理或者相关负责人对公司经营管理行为的合法合规性、风险管理等方面存在的问题不整改或者整改未达到要求的,首席风险官应当及时向期货公司董事长、董事会常设的风险管理委员会或者监事会报告,必要时向中国期货业协会报告。()
通过对______和______的比较分析,可以了解投资者对该基金的认可程度。()[2015年9月真题]
债务人以低于债务账面价值的现金清偿债务,债权人应将债务重组损失计入()。
人民法院审理行政案件,可以依据的规范性文件是()。
已知,y1=x,y2=x2,y3=ex为方程y"+p(x)y'+q(x)y=f(x)的三个特解,则该方程的通解为()
结构化程序设计的3种结构是
An"applepolisher"isonewhogivesgiftstowinfriendshiporspecialtreatment.Itisnotexactlyabribe(贿赂),butiscloset
最新回复
(
0
)