首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,若输入"Visual Basic Programming",则在窗体上输出的是( )。 Private Sub Command1_Click() Dim count(25)As Integer, ch As String ch=U
下面程序运行时,若输入"Visual Basic Programming",则在窗体上输出的是( )。 Private Sub Command1_Click() Dim count(25)As Integer, ch As String ch=U
admin
2015-08-28
49
问题
下面程序运行时,若输入"Visual Basic Programming",则在窗体上输出的是( )。
Private Sub Command1_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
m=count(k)
End If
Next k
Print m
End Sub
选项
A、0
B、1
C、2
D、3
答案
D
解析
根据题中的程序代码可知,ch为输入字符串的大写状态,第一个For循环是依次取出字母,n为取出字母与"A"字符的ASCII码差值,然后再赋给数组count();第二个For循环是找出数组count()中的最小值,因此,最后窗体上输出的结果为3,即选项D。
转载请注明原文地址:https://kaotiyun.com/show/baQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生目录下有一个工程文件sj5.vbp,其窗体上有一个文本框,名称为Textl;还有一个命令按钮,名称为Commandl,标题为“输出结果”,如图64—6所示。并有一个函数isPrimeNum可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个标签,其名称为Labell,然后通过属性窗口设置窗体和标签的属性,实现如下功能:①窗体标题为“设置标签属性”;②标签的位置为:距窗体左边
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sit3.frm。其功能是产生20个0~1000的随机整数,放入一个数组中,然后输出这20个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为“输出平均值”),即可求出
在考生目录下有一个工程文件sjt5.vbp,用来计算勾股定.理整数组合的个数,勾股定理中三个数的关系是:a2+b22=c2,例如3、4、5就是一个满足条件的整数组合(注意:a、b、c分别为4、3、5与分别为3、4、5被视为同一个组合,不应该重复计算)。编写
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的0~999之间的100个整数读入数组a中;②单击“计算”按钮,则找出这100个整数中所有水仙花数,并将它们的最大值与最小值分别显示
下列说法中,不属于数据模型所描述的内容是______。
按照“先进后出”原则组织数据的数据结构是()。
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
结构化程序设计主要强调的是______。
随机试题
A.精神分析B.行为主义C.人本主义D.认知心理E.折中主义自由联想法的理论基础是
软胶囊剂的崩解时限为()。
除遗传因素外,导致扩张型心肌病可能的原因是()
《证券公司信息隔离墙制度指引》中规定,证券公司应当制定(),明确跨墙的审批程序和跨墙人员的行为规范。
下列关于个人所得税纳税期限的表述,不正确的是()。
凡年满()周岁的儿童,其父母或者其他法定监护人应当送其入学接受并完成义务教育;条件不具备的地区的儿童,可以推迟到()周岁。
现代社会的发展,新思潮的涌入,性别角色越来越模糊,主要影响幼儿性别角色行为的因素有()①生物遗传因素②父母对幼儿性别角色和行为起着引导和强化的作用③模仿和扮演的角色④大众媒体的强化
学生特有的本质属性表现在哪些方面?
长效机制是指工作系统中各子系统、各项工作之间长期有效的相互影响、相互作用的过程和方式。它的特点是()。
Dieting,accordingtoanoldjoke,maynotactuallymakeyoulivelonger,butitsurefeelsthatway.Nevertheless,evidencehas
最新回复
(
0
)