首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(其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
44
问题
在窗体上画一个命令按钮(其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://www.kaotiyun.com/show/lNUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列数据结构中,能用二分法进行查找的是
以下关于菜单的叙述中,错误的是
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommand1_Click()Dims1AsString,s2AsStringOpen"c:\d4.
以下关于VB对象属性的叙述中,错误的是
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是
产生100以内(不含100)2位随机整数的VisualBasic表达式是
设窗体上有1个名称为HScroll1的水平滚动条,其Max、Min属性分别设置为100、1;有2个名称分别为Option1、Option2的单选按钮,其标题分别为“30”、“50”;还有下面程序代码:PrivateSubOption1_Click()
在表达式2+3*4^5一Sin(x+1)/2中,首先进行的运算是()。
随机试题
要求定向凝固的铸件内浇道应开设在铸件();要求同时凝固的铸件,内浇道应开设在铸件()。
甲状腺癌中,一般只从血行转移的是
女,11岁。突发高热伴左小腿剧痛4天。体格检查:体温39.5℃,左小腿近干骺端处深压痛,略肿胀,关节间隙无明显压痛。X线检查未见明显异常。对该患者的实验室,下列说法错误的是
下列蛋白质中甘油三酯含量最多的是
王某1998年因盗窃罪被判处有期徒刑3年,于2001年8月刑满释放。2005年5月,王某在当地开设一娱乐城,自任总经理,为谋利非法提供色情服务。为了对付公安机关的查处和管理卖淫妇女,王某聘用何某负责保安,聘用张某协助管理。营业初期,有6名妇女,其中一名不愿
不属于专业承包资质类别的是()。
群众反映三公经费公开的太笼统、不到位。但是领导认为能公开的都公开了。让你去做解释工作。你怎么做?
某教师编制期末测验,满分为100分,信度为0.84,全体考生的标准差为10。若某同学得了70分,考虑到测验误差的存在,那么他的真实水平应在多少分到多少分之间?要写出具体计算步骤,置信系数1一α取0.95。最终计算结果保留两位小数。
Thejourneyaroundtheworldtooktheoldsailorninemonths,______thesailingtimewas226days.
Complainingaboutfaultygoodsorbadservicearenevereasy.【M1】______Mostpeopledislikemakingafuss.Butifsome
最新回复
(
0
)