首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim n()As Integer:Dim a,b As Integer a=InputBox
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim n()As Integer:Dim a,b As Integer a=InputBox
admin
2017-04-25
37
问题
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Private Sub Command1_Click()
Dim n()As Integer:Dim a,b As Integer
a=InputBox("Enter the first number")
b:InputBox("Enter the second number")
ReDim n(a To b)
For k=LBound(n)To UBound(n)
n(k)=k
Print n(k);
Next k
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入2和3,输出结果为
选项
A、1 2
B、2 3
C、3 4
D、4 5
答案
B
解析
动态数组以变量作为下标值,在程序运行过程中完成定义,通常分为两步:首先在窗体层、标准模块或过程中用Dim或Public声明一个没有下标的数组(括号不能省略),然后在过程中随时用ReDim语句可以重定义变量作为下标的数组,重定义后原数组的所有元素值被清空。输入2、3之后数组被重新定义成了n(2 To 3),只有两个数组元素,并且n(k)=k,即输出2 3。
转载请注明原文地址:https://kaotiyun.com/show/yQGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果是______。optionbase1privateeommand1_c1ick()DimA(10)DimE(5)Fori
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程;OptionBase0PrivateSubCommand1_Click()DimcityAsVariantcity=Array("北
Sub过程与Function过程最根本的区别是
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text2.Text=""T
叙述中错误的是()。
在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimer1_______()TextTime.text=TimeEndSub
语句PrintSgn(-5.1^2)+Abs(Int(-5.1^2))的输出结果是()。
在面向对象的程序设计中,下列叙述错误的是______。
假定一个文本框的Name属性为Text1,为了在该文本框中显示“Hello!”,所使用的语句为【】。
随机试题
A.活髓切断术B.塑化治疗C.根管治疗D.直接盖髓术E.间接盖髓术
哪项不是激素与受体结合的共同特征
以下哪一药物适用于老年人、中国及亚洲人群的饮食谱()。
某建设工程于2014年9月15日竣工验收合格并投入使用,按照《建设工程质量管理条例》的规定,建设单位应当在()前,将建设工程竣工验收报告和其他文件报建设行政主管部门进行竣工验收备案。
随着我国对外贸易和远洋运输的发展,特别是为了更好地适应开展第三国之间的国际航线货物运输的需要,中国远洋运输总公司在1990年3月开始使用的运价表中,对各航线不同等级货物的费率、附加费及有关费用改用以美元标价,并系净价。()
下列关于组织理论的说法正确的是()。
学习是通过______,在主体头脑内部积累经验,______以积极适应环境的过程。
这本书虽然以心理学经典理论为基础,但其主要内容都是年轻人非常____________的话题,再加上轻松的语言、丰富的事例,使得年轻人在阅读时总能找到自己的____________。依次填入横线部分最恰当的一项是()。
后现代艺术不再追求_______,而是追求肤浅,追求使他们逃离沦为“操作对象”的艺术,这种艺术的使命即像毒品一样,帮助人们制造令人兴奋的_______和神秘主义的快感。填入画横线部分最恰当的一项是:
简述中国民族电影艺术如何适应市场进而走向世界。
最新回复
(
0
)