首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
179
问题
在窗体上画一个名称为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全国计算机二级
相关试题推荐
面向对象的设计方法与传统的面向过程的方法有本质不同,它的基本原理是______。
在执行KeyPress事件过程时,KeyASCII是所按键的【】值。对于有上档字符和下档字符的键,当执行KeyDown事件过程时,KeyCode是【】字符的ASCII值。
下列程序段的执行结果为a="ABBACDDCBA"ForI=6To2Step-2x=Mid(a,I,I)y=Leh(a,I)z=Right(a,I)z=x&y&
下面控件中,用于将屏幕上的对象分组的是
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(Str(C))Fori=1To4
以下能在窗体Form1的标题栏中显示“VisualBasic窗体”的语句是
下列程序执行后,变量S的值为DimsAsLong,xAsIntegers=0Forx=1To10Step2s=s+xNextxText1.Text=s
在显示字体对话框之前必须设置【】属性,否则,将发生字体不存在的错误。
下列关于Do…Loop语句的叙述不正确的是()
可以产生30一50(含30和50)之间的随机整数的表达式是
随机试题
椭圆囊和球囊的适宜刺激是()。
女性,50岁。月经频发8个月,不规则阴道少量出血20天。妇科检查:子宫前壁结节(直径8cm),子宫约3个月妊娠大,Hb90g/L。进一步处理正确的是
下列乙肝病毒标记物检查结果中,提示病毒复制活跃的是()。
某月经周期正常规律的孕妇,目前怀孕32周孕期进展顺利。该胎儿存活能力
有关注册会计师在审计报告中提及专家的工作,下列说法中,正确的是()。
在教师指导下,学习者接受事物意义的学习称为()
统计中常用的序时平均数有()。
原型法的实现可借助于许多工具为系统实现原型,其中下列哪种工具能用来完成自动输入编辑?
Thereareseveralpossiblerelationshipsbetweenlanguageandsociety.Oneiswhatsocialstructuremayeitherinfluenceordete
ThreeSystemsofMemory1.Sensorymemory■Informationheldforlessthan【T1】______【T1】______■【T2】______ofse
最新回复
(
0
)