首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面的程序段: x=InputBox(“请输入一个整数”) ReDim a(x) For k=x To 0 Step-1 a(k)=k Next k 一般,在这段程序之前应先进行数组a的定义。下面定
设有下面的程序段: x=InputBox(“请输入一个整数”) ReDim a(x) For k=x To 0 Step-1 a(k)=k Next k 一般,在这段程序之前应先进行数组a的定义。下面定
admin
2020-05-11
70
问题
设有下面的程序段:
x=InputBox(“请输入一个整数”)
ReDim a(x)
For k=x To 0 Step-1
a(k)=k
Next k
一般,在这段程序之前应先进行数组a的定义。下面定义语句中正确的是( )。
选项
A、Dim a(100)As Integer
B、Dim a( )As Integer
C、Dim a As Integer
D、Dim a(0 To 100)As Integer
答案
B
解析
在VB中定义动态数组通常分两步:首先在窗体层或标准模块中用Dim、Private或Public声明一个没有下标的数组(括号不能省略),然后在过程中用ReDim语句定义带下标的数组。根据题意,选项B正确。
转载请注明原文地址:https://kaotiyun.com/show/XEHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的0~999之间的100个整数读入数组a中;②单击“计算”按钮,则找出这100个整数中所有水仙花数,并将它们的最
(1)在名称为Form1的窗体上画一个名称为Label1、标题为“添加项目:”的标签;画一个名称为Text1的文本框,没有初始内容;画一个名称为Combo1的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Co
在考生文件夹下有一个工程文件vbsj5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Form1的窗体上画两个命令按钮,其名称分别为cmdRead和cmdCal,标题分别为“读入数据”和“计算保存”(如图3-61所示)。程序运行后,如果单击“读入数
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“添加”;有一个文本框,名称为Text1,初始内容为空白;有一个列表框,名称为List1。程序运行后,在文本框中输
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1、标题为“菜单”的窗体上,设计满足如下要求的菜单:运行后的窗体如图1-207所示。存盘时,将文件保存至考生文件夹下,且工程文件名为s
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画1个命令按钮,其名称为C1,标题为“等级考试”;再画1个文本框,名称为T1,如图3-184(a)所示。请编写适当的事件过程,使程序运行
在数据管理技术发展的三个阶段中,数据共享最好的是( )。
在长度为n的有序线性表中进行二分查找,最坏情况下需要比较的次数是( )。
算法的有穷性是指()。
如图所示,在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1______________TextTime.Text=TimeEndSu
随机试题
TAT皮试液每0.1ml含()。
关于狂犬病病毒,下面错误的说法是
根据电子商务主体法律制度的规定,下列不属于电子商务经营者的是()。
历史人物对历史发展具有重要作用,不会受到历史条件的制约。()
A.良性肿瘤B.恶性肿瘤C.非肿瘤性良性病变D.癌前病变原位癌是
南宋庆元年间,某州有一妇人被杀。死者丈夫甲被当地州衙拘捕,受尽拷掠,招认了“杀妻事实”。在该案提交本路提刑司审核对时,甲推翻原口供,断然否认杀妻指控。对此,提刑司的下列做法中,符合宋代翻异别推制度规定的是()(2018年非法学综合课单选第32题,2
类图技术是面向对象方法的核心技术。下列所示UML的类图,正确的是()。
下列叙述中错误的是()。
61)Inafamilywheretherolesofmenandwomenarenotsharplyseparatedandwheremanyhouseholdtasksaresharedtoagreater
Sayingaboutagoodjob工作称心
最新回复
(
0
)