首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码: Private Sub Command 1 Click() Dim n0 As Integer Dim a,bAs Integer a=InputBox(“Enter the
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码: Private Sub Command 1 Click() Dim n0 As Integer Dim a,bAs Integer a=InputBox(“Enter the
admin
2015-11-24
54
问题
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:
Private Sub Command 1 Click()
Dim n0 As Integer
Dim a,bAs 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
选项
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/5kLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请补充完整。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOutputAs#1Fori=1To
向顺序文件Temp.txt中写入1,2,3这3个数。在程序中加入以下语句的那项可以使程序功能完整。PrivateSubCommand1_ClickOpen"c:\Temp.txt",OutputAs#1Fori=0To3Nex
下面有一段程序代码,如果从键盘上输入"Computer",则在文本框内显示的内容是PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii>=65AndKeyAscii
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式计算,图的窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时,在Text1、Text2中分别输入n和r的值,单击Command1按钮即可求出选法的个数,并
下列程序段的执行结果为DimA(3,3)ForM=1To3ForN=1To3IfN=MOrN=3-M+1ThenA(M,N)=1ElseA(M,N)=0EndIfNextNNextMForM=1To
有如下程序:PrivateSubForm_Click()DimiAsInteger,sumASIntegersum=0Fori=2To10IfiMod2<>0AndiMod
实现字符串Unicode编码方式与州SI编码方式相互转换的函数是()。
以下Case语句中错误的是()。
将Cos(Y)四舍五入保留3位小数的表达式是()。
将任意一个正的两位数N的个位数与十位数对换的表达式为()。
随机试题
A.吸气性呼吸困难B.呼气性呼吸困难C.夜间阵发性呼吸困难D.进行性呼吸窘迫充血性心力衰竭
【2012年第4题】题1~5:某城市拟在市中心建一座400m高集商业、办公、酒店为一体的标志性建筑,当地的海拔高度2000m,主电源采用35kV高压电缆进户供电,建筑物内设35/10kV及10/0.4kV变电所,高压与低压电气装置公用接地网,请回答下列问题
客户授信额度按授信形式不同,包括( )。
反映企业,即刻变现能力的财务指标是()。
2013年3月18日,甲机械公司与乙融资租赁公司接洽融资租赁某型号数控机床事宜。同年4月1日,乙按照甲的要求与丙精密设备公司签订了购买1台某型号数控机床的买卖合同。丁以乙的保证人身份在该买卖合同上签字,但合同中并无保证条款,丙和丁亦未另行签订保证合同。乙和
根基民事法律制度的规定,下列关于附条件民事法律行为所附条件的表述中,正确的是()。
甲、乙二人约定,如果30天内下雨,甲就将送给乙一把雨伞,该约定()。
数据字典(DD)所定义的对象都包含于
Readthetextbelowabouthowtodenyconsumers’claims.Inmostofthelines(34-45)thereisoneextraword.Itiseithergramma
Recentlytherehasbeenagreat______forsmallcarsthatuselittlepetrol.
最新回复
(
0
)