首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() Dim a As Variant Dim i As Integer, m As Integ
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() Dim a As Variant Dim i As Integer, m As Integ
admin
2019-06-20
52
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Option Base 1
Private Sub Command1_Click()
Dim a As Variant
Dim i As Integer, m As Integer, index As Integer
a = Array(-10, 23, -50, 90)
m = a(LBound(A))
index = LBound(A)
For i = LBound(A) To UBound(A)
If a(i) < m Then
m = a(i)
index = i
End If
Next i
Print index
End Sub
程序运行时,单击Command1,则在窗体上输出的结果是
选项
A、0
B、1
C、2
D、3
答案
D
解析
UBound函数返回为指定的数组维可用的最大下标,LBound函数返回为指定的数组维可用的最小下标。程序开头定义了Option Base 1这时定义一维数组下标从1开始;故LBound(A)=1,Ubound(A)=4;m = a(LBound(A))=a(1)=-10,index=LBound(A)=1。If 条件 Then部分,如果选择的条件为真,则执行then部分;For i=1 To 4,当i=1时,if条件a(i)=a(1)=-10<-10为假,不执行then部分;当i=2时,if条件a(i)=a(2)=23<-10为假,不执行then部分;当i=3时,if条件a(i)=a(3)=-50<-10为真,执行then部分,m=a(3)=-50,接着执行index=i=3;当i=4时,if条件a(i)=a(4)=90<-10为假,不执行then部分;外层for循环结束,故index=3。本题正确选项为D。
转载请注明原文地址:https://kaotiyun.com/show/XvUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
运行下面的程序,单击命令按钮,输出结果为()。FunctionF(aAsInteger)b=0:Staticcb=b+1:c=c+1:F=a+b+cEndFunctionPrivateSubCommand1_Click()
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图3—100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1标题为“选课”的窗体上画一个复选框数组,名称为CH1,共有四个复选框,按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”,其中“语文”、“计算机
下列数组定义中错误的是
设窗体上有一个名称为HSl的水平滚动条,如果执行了语句:HS1.Value=(HS1.Max-HS1.Min)/2+HS1.Min则:
在软件生命周期中,能准确确定软件系统必须做什么和必须具备哪些功能的阶段是
下列关于二叉树的叙述中,正确的是()。
假定有以下循环结构DoUntil条件表达式循环体Loop则以下正确的描述是
8.6787E+8写成普通的十进制数是()。
随机试题
现存第一部完整记录二十四节气名称的历史文献是()
下列有关成本曲线的叙述正确的是()
呈“十”字形发育沟的牙是
A.活血破瘀,通经消癥B.滋阴清热,固经止带C.益气养血,理气活血D.理气养血,暖宫调经E.凉血止血,化湿和中大黄蛰虫丸的功能是()。
上述材料供应合同无效,此时担保合同( )。下列表述中,错误的是( )。
以下关于可供分配的利润表述正确的是( )。
Itwaswithgreatjoy______heknewthathisGMATscoreis670,highenoughtoapplytoatopuniversityofbusiness.
我国最早的学校教育机构是()
我们用比较低档的望远镜看远处的物体时,会看到物体边缘有彩色的轮廓,这是因为光的色散现象。()
ReadthetextbelowaboutMilair’sletterofapology.Inmostoftheline(34-45)thereisoneextraword.Itiseithergrammati
最新回复
(
0
)