首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框,通过属性窗口把窗体的KeyPreview属性设置为True,然后编写如下程序: Option Base 1 Private Sub Form_Load() Show Text1.SetFocus En
在窗体上画一个名称为Text1的文本框,通过属性窗口把窗体的KeyPreview属性设置为True,然后编写如下程序: Option Base 1 Private Sub Form_Load() Show Text1.SetFocus En
admin
2015-06-30
190
问题
在窗体上画一个名称为Text1的文本框,通过属性窗口把窗体的KeyPreview属性设置为True,然后编写如下程序:
Option Base 1
Private Sub Form_Load()
Show
Text1.SetFocus
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Dim Arr
Arr = Array(567, 234, 79, 823, 535)
m1 = Arr(1)
If KeyAscii = 13 Then
For i = 2 To 5
If Arr(i) > m1 Then
m1 = Arr(i)
m2 = i
End If
Next i
End If
Text1.Text = Str(m1) & " " & Str(m2)
End Sub
运行程序,按回车键,在文本框中显示的是
选项
A、535 5
B、567 1
C、823 4
D、234 2
答案
C
解析
Arr是一个数组为[567,234,79,823,535],m1定义为567,当按下回车键时,KeyAscii = 13,执行循环。从i=2到5,如果Arr(i)>m1,则将Arr(i)存储于m1中,相应的i存储于m2中,循环执行,目的在于选取Arr这个数组最大的数,并存储于m1;其最大数的相应下标存储于m2中。故可知当i=2时,Arr(2)
m1,执行Then后的语句,m1=Arr(4)=823,m2=i=4; 当i=3时,Arr(5)
转载请注明原文地址:https://kaotiyun.com/show/a0Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序段运行的结果是______。Dima(-1To5)AsBooleanDimflagAsBooleanflag=FalseDimiAsIntegerDimjAsIntegerDo
以下关系表达式中,其值为假的是______。
执行下面的语句后,所产生的信息框的标题是()a=MsgBox(“AAAA”,“BBBB”,“”,5)
完全不考虑程序的内部结构和内部特征,而只是根据程序功能导出测试用例的测试方法是
在C:\Pic文件夹中有一个图形文件,名为Welcome.gif。为了将该图形装入窗体Form1,应使用的语句为()
以下循环的执行次数是【】。k=0DoUntilk>=10k=k+1Loop
下列叙述中正确的是______。
有一个学生选课的关系,其中学生的关系模式为:学生(学号,姓名,班级,年龄),课程的关系模式为:课程(课号,课程名,学时),其中两个关系模式的键分别是学号和课号,则关系模式选课可定义为:选课(学号,【】,成绩)。
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生20个0~1000的随机整数,放入一个数组中,然后输出这20个整数中大于500的所有整数之和。程序运行后,单击命令按钮(名称为Commandl,标题为“输出大
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
随机试题
不论是成就自己的人生理想,还是担负时代的神圣使命,都应深入学习更高层次和更广泛的知识,努力做到“()”与“博”的统一。
无神之舌为
下列除哪项外,均是单纯性肾病的诊断标准( )。
下列哪项反应不属于烃基的代酣反应
2019年度甲公司发生如下交易或事项:(1)1月3日,甲公司出售某办公楼,实际收取款项2112万元(含增值税,增值税税率10%)存入银行,该办公楼原价为3000万元,采用年限平均法按20年计提折旧,预计净残值率为4%,出售时已计提折旧9年,未计提
与矩阵D=相似的矩阵是【】
Extraordinarycreativeactivityhasbeencharacterizedasrevolutionary,flyinginthefaceofwhatisestablishedandproducing
ThePurposeofLiteraryAnalysisI.Introduction—makingreadersappreciate【T1】ofliteraryworks【T1】______—relatingliteratur
Openingnightat.theGandhiRestaurantbroughtcriesofpraiseanddelightfromcustomerswhentheysampledtheuniquecuisine
Mozartbegantoshowhistalentinmusicattheageof______.A.3B.5Theword"rivalry"onLine:2,Pa
最新回复
(
0
)