首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。 Private Sub Command 1_Click() Dim count(25)As Integer,ch As String
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。 Private Sub Command 1_Click() Dim count(25)As Integer,ch As String
admin
2013-11-29
70
问题
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。
Private Sub Command 1_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=l To 25
If in
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/4XQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sj5.vbp,窗体Forml上有两个标签、两个文本框与一个命令按钮。其中命令按钮的名称为Commandl、标题为“查找”;文本框的名称分别是Textl与Text2,内空;标签名称分别是Labell与Label2,标题为“查找内
在名称为Forml的窗体画两个Label控件,名称分别为Labell和Label2,其中Labell中显示“总人数”,Label2中显示“平均分”,两个名称分别为Textl和Text2的文本框,再画两个命令按钮,名称分别为Commandl与Command2
在窗体上画—个文本框(名称为Text1)和—个标签(名称为Label1),程序运行后,在文本框中每输入—个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是______。
设某个程序中要用到一个二维数组,要求数组名为A,类型为字符串类型,第一维下标从1到5,第二维下标从-2到6,则相应的数组声明语句为【】
已知变量x,y为整数型,且x=4,y=12,s为字符串型,且s=“a”,lblok为标签控件,下列赋值语句合法的是______。
在VisualBasic中,要将一个窗体装载到内存进行预处理,但不显示,应该使用那种语句:______。
下面对对象概念描述错误的是______。
实现算法所需的存储单元多少和算法的工作量大小分别称为算法的【】。
声明一个变量为局部变量应该用()。
随机试题
彩色多普勒血流显示蓝色时表示
某企业预计明年销售收入将达到6000万元,总成本费用将为5600万元,该企业明年应缴纳()。
影响基坑稳定性的说法,不正确的是()。
某制药设备机电安装工程项目,监理单位要求总承包商编制并提交该工程施工组织设计,总承包商首先确定了该工程的总体施工流程,继而编制了施工组织设计并提交监理工程师。总承包商在施工过程中出现以下情况:(1)制药设备由厂家将其分解成零部件运输到安装施工现场。(2
逻辑数据独立性是指()。
以下属于《新巴塞尔资本协议》内容的是()。
下列关于学前美术教育活动的目标陈述中,符合行为目标取向的是()
关系R(A,B,C)和S(C,D,E)进行关系代数运算,下列各关系表达式中成立的是(30)。关系模式P(A,B,C,D,E,P,G,H,I,J)满足下列函数依赖;FD={ABD→E,AB→G,B→F,C→J,CJ→I,G→H},FD的最小函数依敕集
Hisgreatsuccess______(与其说在于运气不如说靠努力).
Ifyou’reinchargeofChristmasdinner,withallitsinterconnectedtasksandchallengesoftiming—whentopreheattheoven,wh
最新回复
(
0
)