首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。 Private Sub Commandl_Click() Dim Num(25)As Integer,Chrl As Strin
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。 Private Sub Commandl_Click() Dim Num(25)As Integer,Chrl As Strin
admin
2018-12-20
63
问题
下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。
Private Sub Commandl_Click()
Dim Num(25)As Integer,Chrl As String
Chrl=UCase(InputBox(”请输入字母字符串”))
For k=1 To L,en(Chrl)
n=Asc(Mid(Chrl.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=Num(k)
End If
Next k
Print m
End Sub
选项
A、3
B、2
C、1
D、0
答案
A
解析
该程序的第一个循环是遍历整个字符串,其中数组Num的作用是存放对应字符的出现次数;第二个循环的作用是找到数组Num中的最大值,所以整个程序的功能就是找到在输入字符串中出现次数最多的字母,并输出其出现的次数。
转载请注明原文地址:https://kaotiyun.com/show/sjFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsInteger DimtAsInteger t=a-b b=t+a
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfunc(LAsLabel) L.Caption="1234"EndSubPrivateSubForm
用来设置文字字体是否为粗体的属性是( )。
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是( )。
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。
为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容,首先应执行的操作是
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
窗体上有一个Text1文本框,并编写了下面事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger) KeyAscii=KeyAscii+3EndSub程序运行时,在文本框中输入字符"A",则在文本
随机试题
什么是电弧静电特性?电弧静电特性有何特点?
肺位于_______内,_______的两侧,其中右肺较_______,左肺较_______。
患者男性,56岁,无明显自觉症状,出现无痛性肉眼血尿。超声特征:左肾实质内可见一5cm左右低回声不均匀实质性肿块,表面呈分叶状,内部及周边均可探及较丰富血流信号,肾窦受压变形。本病可诊断为
男性,56岁,患冠心病多年,3小时前突然出现双下肢剧烈疼痛,行走困难,局部皮肤苍白。查体:双下肢股动脉搏动消失,双股以下皮温低,肌力4级。诊断为
A.300ml以下B.300~500mlC.500~700mlD.700~1000mlE.1000ml以上
异羟肟酸铁反应显阳性的是
某汽车运输公司2017年11月购置客车3辆并办理了相关手续,未签订合同;2017年12月与甲企业签订货物运输合同,合同记载材料价款100万元,运输费10万元,装卸费2万元,保险费3万元(客车车船税年税额为500元/辆)。则下列说法正确的有()。
下列有关存货监盘表述中,不正确的是()。
什么是随机原则?在抽样调查中为什么要坚持随机原则?
Thesmellofthemeatwassobadthatshefeltsickandturnedaway______.
最新回复
(
0
)