首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码: Private Sub Command l_Click() Dim n()As Integer Dim a,b As I
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码: Private Sub Command l_Click() Dim n()As Integer Dim a,b As I
admin
2019-06-11
43
问题
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:
Private Sub Command l_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/lNUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub则
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubFormKeyDown(KeyCodePrivateSubForm_KeyPress(KeyAsciiAsInteger,ShiftAsIntege
程序流程图中带有箭头的线段表示的是
通过一个属性可以获得文件列表框中当前被选中文件的文件名,这个属性是
下列说法中,错误的是
下面不属于软件需求分析阶段主要工作的是
在VisualBasic中,不能关闭的窗口是
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别为“读数据”和“统计”的命令按钮。请画两个标签,其名称分别足Label1和Label2,标题分别为“单词的平均长度为”和“最长单词的长度为”;再画两个名称分别为Textl和Text2、初始
(1)有一个名为samp1.accdb的数据库。试修改职工表“employee”的结构,在“职工号”字段后增加“姓名”字段,其数据类型为文本型,长度为6,并对应职工号添加其姓名,见表2.6。(2)判断并设置表“employee”的主键,刚时将上
随机试题
板桩建筑物沉桩时,沿板桩墙纵轴线方向的垂直度偏差超过规定时,对于钢筋混凝土板桩,可采用()的方法进行调整。
()是运用归纳推理形式所进行的论证。
阳水辨证属风水相搏者,其最佳选方是
回阳救逆的常用组合是
A.TRAb平均阳性率30%~40%B.广泛纤维化和淋巴细胞浸润C.与病毒感染有关D.20%发生永久性甲减E.滤泡结构破坏,存在大量吞噬细胞
单位撤销、合并或改变隶属关系、更换财产库存现金保管人员时,需要进行全面清查。()
国家质检总局可根据需要对《出入境检验检疫机构实施检验检疫的进出境商品目录》定期或不定期进行调整公布实施。()
某甲贩运假烟,驾车路过一个检查站时,被工商部门拦住检查,检查人员朱某正登车检查时,甲突然发动汽车夺路而逃,朱抓住汽车把手不放,甲为了摆脱朱某,在疾驶后突然急刹车,朱某被摔倒在地,头部着地死亡。甲对朱某死亡的心理态度是( )。
Youmusthavebeentroubledbywhentosay"Iloveyou"becauseitisoneofthegreatestpuzzlesinourlife.Whatifyous
Obama’sSuccessIsn’tAllGoodNewsforBlackAmericansAsErinWhitewatchedtheelectionresultsheadtowardsvictoryfor
最新回复
(
0
)