首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
63
问题
在窗体上画一个名称为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全国计算机二级
相关试题推荐
若看到程序中有以下事件过程,则可以肯定的是,当程序运行时( )。PrivateSubClick_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Print
VisualBasic中的整数可以用十六进制或八进制表示,十六进制数前面冠以&H,八进制数前面冠以
设有关键码序列(66,13,51,76,81,26,57,69,23),要按关键码值递增的次序排序若采用快速排序法,并以第一个元素为划分的基准,那么第一趟划分后的结果为()。
为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容,首先应执行的操作是
关于随机文件,以下叙述中错误的是()。
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click() Dimn%
若要清除列表框控件中的所有列表项,应该使用的方法是
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图所示。运行程序,单击“读数据”按钮,读入文件中的数据到字符串变量中并显示在Label2标签中。单击“排序”命令按钮时,对读入的数据从小到大进行排序,并将排序结果在窗体的Label4控件中显示。
窗体上有一个名称为Cbl的组合框,程序运行后,为了输出选中的列表项,应使用的语句是()。
在窗体上有一个名称为Drivel的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为File1的文件列表框,两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化
随机试题
Solongasteachersfailtodistinguishbetweenteachingandlearning,theywillcontinuetoundertaketodoforchildrenthatw
关于准直器选择的叙述,错误的是
A.万古霉素B.庆大霉素C.头孢他啶D.哌拉西林E.头孢曲松新生儿金黄色葡萄球菌败血症首选的抗生素是
某管沟直埋工程,设计图示管道中心线长250m,水平最大宽度1.00m,管底外表面标高为-1.25m,地面平均标高为0.25m,埋管土壤为Ⅱ类土。根据《建设工程工程量清单计价规范》的有关规定,该管沟土方工程量为( )。
社会不公平的原因中不包括( )。
教师职业道德修养的最高层次是“慎独”。()
十六进制CD21表示为二进制是()。
个人道德判断能力的发展经历了六个阶段:一是避罚服从取向阶段,为避免惩罚而服从权威或规则;二是相对功利取向阶段,评定行为好坏主要看是否符合自己的利益;三是寻求认可取向阶段,顺从传统要求,谋求大家的赞赏和认可;四是遵守法规取向阶段,服从社会规范,遵守法律权威;
为了隐藏在文本框中输入的信息,用占位符代替显示用户输入的字符,需要设置的属性是( )。
Knowingisdiscipline-specific;itdefinesallthosethingswecometolearnwhenwepursuethecraftofourparticulartraining
最新回复
(
0
)