首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,若输入"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
2018-09-19
57
问题
下面程序运行时,若输入"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/t2Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:PrivateSubCommand1_Click() n%=List1.ListIndex Ifn>0Then ch$=List1.Lis
在设计阶段,为了设置某控件的Left属性,可使用的方法是
软件设计中模块划分应遵循的准则是
设栈的顺序存储空间为S(0:49),栈底指针bottom=49,栈顶指针top=30(指向栈顶元素)。则栈中的元素个数为
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是( )。
把数学表达式表示为正确的VB表达式应该是( )。
一个运动队有多个队员,一个队员仅属于一个运动队,一个队一般都有一个教练,则实体运动队和队员的联系是
下面对类-对象主要特征描述正确的是
设数据元素的集合D={1,2,3,4,5},则满足下列关系R的数据结构中为线性结构的是
支持子程序调用的数据结构是( )。
随机试题
行政组织作为国家机器的重要组成部分,在本质上是一个()
A.河豚毒B.四乙胺C.阿托品D.箭毒选择性阻断Na+通道的物质是
当代中国法律渊源中最重要的部分是下列哪一选项?()
根据金融期货投资者适当性制度,关于综合评估中的投资经历,投资者应当提供近期加盖相关证券营业部机构业务专用章的()作为证券金融现货交易经历证明。[2015年3月真题]
下列属于财务顾问应当配合中国证监会工作的是()。Ⅰ.指定财务顾问主办人与中国证监会进行专业沟通,并按照中国证监会提出的反馈意见作出回复Ⅱ.按照中国证监会的要求对涉及本次并购重组活动的特定事项进行尽职调查或者核查Ⅲ.组织委托人及其他
随着雾霾天气长期大范围持续,空气净化器日益走进普通百姓家庭,售价看涨的走势成为该行业发展的催化剂,不考虑其他因素,能正确反映这种变动传导效应的是(注:D、S为变动前,D1、S1为变动后)()。
设连续函数f(x)满足,求f(x).
TheJapanesedesireformarriagehadbeenverystrong.Inthefifth"worldyouthattitudesurvey"【1】bytheManagementandCoordi
OnthemorningofSeptember11th,IboardedthetrainfromWashingtonHeightsinUpperManhattanjustasusualandwenttotheB
A、Animals’skins,jewelsandstone.B、Clay,paint,andcloth.C、Metals,animals’skinsandclay.D、Paint,clayandstone.D
最新回复
(
0
)