首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Text1的文本框,通过属性窗口把窗体的KeyPreview属性设置为True,然后编写如下程序: True,然后编写如下程序: Option Base 1 Private Sub Form_Load() Show Te
在窗体上画一个名称为Text1的文本框,通过属性窗口把窗体的KeyPreview属性设置为True,然后编写如下程序: True,然后编写如下程序: Option Base 1 Private Sub Form_Load() Show Te
admin
2020-07-22
62
问题
在窗体上画一个名称为Text1的文本框,通过属性窗口把窗体的KeyPreview属性设置为True,然后编写如下程序:
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://jikaoti.com/ti/HoS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设计窗体时双击窗体的任何地方,可以打开的窗口是()。
以下关于控件数组的叙述中,正确的是
以下关于框架的叙述中,错误的是
为了对多个控件执行操作,必须选中这些控件。下列不能选中多个控件的操作是
以下不属于VisualBasic数据文件的是
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
下列叙述中正确的是()。
VB中,若没有显式声明变量的数据类型,则默认的类型是
按照“后进先出”原则组织数据的数据结构是
随机试题
距骨下关节面呈切线位显示的摄影体位是
母犬,脐部出现局限性肿胀近6个月,触诊该肿胀柔软,饱食和挣扎时肿胀增大,压迫肿胀可缩小,皮肤无红、热、痛等炎性反应。该病最可能的诊断是()。
上颌第一磨牙较长的髓角是
用加总的方法进行扩大时距的数据合并,适用于时点性总量指标。( )
以下关于封闭式基金的说法,不正确的是()。
银行集中监管体制是指政府通过()银行监管当局来行使监管职能的方式。
“人而无信,不知其可也。”诚实守信是公民道德的基石,是对每个人最起码的道德要求,同时也是一种经济道德、社会公德。“诚招天下客,誉从信中来”,诚信是市场经济的本质属性.是企业宝贵的无形资产。诚信也是社会和谐的纽带,如果不能在公民中普遍地培育起诚信意识,人与人
Therigidhigher-educationbusinessisabouttoexperienceawelcomeearthquake.Traditionaluniversitiesnowfaceanew【C1】____
______resultsin"Acidrain"?______couldcontributetoglobalwarming?
Manypeoplecatchacoldinthespringtimeorfall.Itmakesus【T1】______:ifscientistscansendamantothemoon,whycan’tt
最新回复
(
0
)