首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base 0 Private Sub Command1_Click() Dim Al(4) As Integer, A2(4) As Integer
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base 0 Private Sub Command1_Click() Dim Al(4) As Integer, A2(4) As Integer
admin
2009-07-23
34
问题
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base 0 Private Sub Command1_Click() Dim Al(4) As Integer, A2(4) As Integer For k = 0 To 2 A1(k + 1) = InputBox (“请输入1个整数”) A2(3 - k) = A1(k + 1) Next k Print A2(k) End Sub程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,输出结果为______。
选项
A、1
B、2
C、3
D、4
答案
B
解析
转载请注明原文地址:https://kaotiyun.com/show/Vu1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若a=00110111,则a>>2语句的执行结果为()
为了合理组织数据,应遵循的设计原则是()
下列语句序列执行后,i的值是()inti=10;do{i-=2;}while(i>6);
下面的是关于类及其修饰符的一些描述,不正确的是()
所有在函数中定义的变量,连同形式参数,都属于()。
程序如下:∥Java_2.javaimportjava.awt.*;importjava.awt.event.*;∥**********Found*********
有一个学生选课的关系,其中学生的关系模式为:学生(学号,姓名,班级,年龄),课程的关系模式为:课程(课号,课程名,学时),其中两个关系模式的键分别是学号和课号,则关系模式选课可定义为:选课(学号,______,成绩)。
当使用SomeThreadt=newSomeThread()创建一个线程时,下列叙述中正确的是()。
有两个关系R和T如下:则由关系R得到关系T的操作是()。
下列内部类的正确用途是btnn.addActionListener(new//注册监听器ActionListener(){publicvoidactionPerformed(ActionEventevent)
随机试题
此证应选用()若病情进一步发展,症见胁肋隐痛,遇劳加重,心烦头晕,睡眠欠佳,舌红苔薄,少津,脉弦细。治宜加用()
下列关于软胶囊剂的叙述,正确的是
商业银行经营管理过程中,资本作为风险的第一承受者,发挥了至关重要的作用。积极地推动了商业银行实现规模最大化的战略目标。()
我国是桂花的故乡,西南、中南地区是它的原产地,现在各地都有种植。在战国时代,屈原的《九歌》中就曾多次出现“桂舟”、“桂酒”等词,这是最早以桂入诗的例子。陕西省勉县城南定军山武侯墓前有两株桂花,相传栽种于汉代,已有1700多年历史,人们称它们为“汉桂”。
伦敦某研究团队使用结构性磁共振成像技术,对18名16岁至21岁的吸烟青少年和此年龄段24名不吸烟的青少年的大脑进行了检测。结果发现,吸烟者的右脑岛比非吸烟者右脑岛体积要小,脑岛周围被大脑皮层包裹,与大脑的记忆、意识和语言功能区彼此相连。研究者认为,吸烟改变
A.宽面综合征B.短面综合征C.长面综合征D.颅面骨发育不全综合征E.下颌面部发育不全综合征上颌垂直向发育过度伴下颌发育不足的是()。
()是将既有的形态:点、线、面在两度空间的平面内,按照一定的秩序和法则进行分解、组合,从而构成理想的形态和有意味的形式。
以下是一个竞赛评分程序。其功能是去掉8位评委中的一个最高分和一个最低分,计算平均分。DimmaxAsInteger,minAsIntegerDimIAsInteger.xAsInteger,SAsIntegermax=0:mi
请在【答题】菜单下选择【进入考生文件夹】命令,并按照题目要求完成下面的操作。注意:以下的文件必须都保存在考生文件夹下。期末考试结束了,初三(14)班的班主任助理王老师需要对本班学生的各科考试成绩进行统计分析,并为每个学生制作一份成绩通知
Beforethesummerof2000,the54yearoldJohnHaughomcouldaccomplishjustaboutanythingatwork."Icouldmovemountainsi
最新回复
(
0
)