首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,若输入"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
2020-06-30
36
问题
下面程序运行时,若输入"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/eGHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定有如下的Sub过程:SubS(xAsSingle,yAsSingle)t=x:x=t/yy=tModyEndSub在窗体上画一个命令按钮,然后编写如下事件过程:Private
已知在菜单编辑器中设计了窗体的快捷菜单,其主菜单为a1,且取消其“可见”属性,如图2所示。运行时,以下()事件过程可以使快捷菜单的菜单项响应鼠标右键单击。
(1)在名称为Form1的窗体中画一个名称为lblClock的标签,其标题为“0”,BorderStyle属性为1;再添加一个名称为tmrClock的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图1-3
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。
以下控件中,能显示滚动条的是
下面()不是VB的文件系统控件。
下面关于文件叙述中错误的是()。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
以下能够正确退出循环的是()。
随机试题
男性,68岁。9天前因肝癌行手术治疗。5天前出现胡言乱语,伴躁动及睡眠倒错,计算力及定向力迅速下降,最终死亡。最可能的死亡原因是
氯气泄漏后,处理空气中氯的最好方法是向空气中( )。
在交流电动机、直流电动机的选择中,下列哪一项是直流电动机的优点?()
基金销售机构可以将自有资产与投资人资产并账管理。()
费用率是评价基金运作效率和运作成本的一个重要统计指标。()
证券投资人可分为()。Ⅰ.机构投资者Ⅱ.政府投资者Ⅲ.个人投资者Ⅳ.国家投资者
学海、学思两公司属同一集团,学海公司为上市公司,2014—2016年发生的与投资相关的交易或事项如下:(1)2014年7月1日,学海公司向中联公司的控股股东中运公司以每股15元的发行价格定向增发本公司普通股股票500万股(每股面值1元),取得中联公司25
古有一父,为解决家中鼠患,买了一只猫,猫抓老鼠的同时,却也偷吃了鸡。其子甚怨。父道:“宁无鸡,也不能无猫,因无鸡不会挨饿受冻,而无猫,则会挨饿受冻。”其子遂不再怨。这件事启示我们在处理和解决问题时要注意()。
民生支出要“守住底线、突出重点、完善制度、引导舆论”,“政府主要是保基本,多做雪中送炭的工作,把加大投入与完善制度有机结合,增强民生政策的公平性和可持续性。”……在2013年12月举行的全国财政工作会议上,财政部部长楼继伟对2014年完善财政投入、有效保障
简述墨西哥卡德纳斯改革。
最新回复
(
0
)