首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
2020-04-18
66
问题
在窗体上画一个名称为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/HMTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下对文件分类的划分不正确的是()。
在窗体上画一个组合框,一个命令按钮和一个文本框,其名称分别为Combol,Command1和Text1,然后编写如下事件过程:PrivateSubForm_Load()Combol.AddItem"AAAAA"Combol
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:PrivateSubCommandl_Ctick()DimM(to)AsIntegerFork=1To10M(k)=12一kNe
在窗体上画一个名称为Textl的文本框,然后画一个名称为Hscrolll的滚动条,其Min和Max属性分别为0和1000。程序运行后,如果移动滑块,则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是()。
下列关于线性链表的叙述中,正确的是()。
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click() Dimn%
若在窗体模块的声明部分声明了如下自定义类型和数组:PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是( )。
数据库设计过程不包括
下列选项中属于面向对象设计方法主要特征的是( )。
软件工程的理论和技术性研究的内容主要包括软件开发技术和()。
随机试题
以创造或扩展谈判的可能性协议空间,从而寻求增大谈判能力的一种谈判力是()
是处红衰翠减,苒苒物华休。
A、generallyB、forgiveC、graduateD、guaranteeA
银一氯化银电极既可以做参比电极又可以做指示电极。()
A.x线检查有膈下游离气体B.移动性浊音阳性C.白细胞计数增高D.腹腔穿刺抽出不凝血液E.立位X线腹平片可见气液平面
全冠修复中不可能对牙髓造成危害的因素是
建设项目竣工决算应包括()的全部实际费用。
构成机器设备重置成本的间接费用主要有( )。
人际吸引的特征表现为认知协调、情感和谐和()
设f(x)在[a,b]上连续,且f(x)>0,证明:存在ξ∈(a,b),使得∫aξf(x)dx=∫ξbf(x)dx.
最新回复
(
0
)