首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim n()As Integer Dim a,b As Integer a=InputBox("Enter the
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim n()As Integer Dim a,b As Integer a=InputBox("Enter the
admin
2020-04-18
15
问题
在窗体上画一个命令按钮(其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
解析
输入2和3后,n被重新定义,下标为2,上标为3。For循环执行2次,k=2k=3。因此选B。
转载请注明原文地址:https://kaotiyun.com/show/HvTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面不属于软件测试实施步骤的是
现有如下程序:PrivateSubCommandl_Click()S=0Fori=lTo5S=S+f(5+i)NextPrint
窗体上有一个名称为Cbl的组合框,程序运行后,为了输出选中的列表项,应使用的语句是()。
设a="VisualBasic",下面语句中可使b="Basic"的是()。
窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下:PrivateSubCommand1_Click(IndexAsInteger) IfIndex=1Then Print"计算机等级考试" En
能够存放组合框的所有项目内容的属性是( )。
为了使命令按钮显示为图形形式,要设置一些属性,下列与这些属性无关的是
关于随机文件,以下叙述中错误的是()。
假定已在窗体上画了多个控件,其中有一个被选中,为了在属性窗口中设置窗体的属性,预先应执行的操作是( )。
在窗体上有一个名称为Checkl的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中(如图所示)。下面能实现此功能的事件过程是()。
随机试题
紫杉醇注射剂中加入表面活性剂聚氧乙烯蓖麻油是为了
水性包衣处方成分重量(%W/W)作用羟丙甲纤维素(5mPaS)7.5()聚乙二醇4000.8()色淀(按固体物计
男,46岁,因心悸、胸痛、劳力性呼吸困难数日就诊。心电图示左室肥大,Ⅱ、Ⅲ、AVF、AVL导联有病理性Q波。心导管检查示左室流出道与室腔间压差>20mmHg,Brockenbrough现象阳性。诊断是
以下项目中不是财产清查的基本程序的是()。
某建筑物建筑面积为100m2,经过年数5年,单位建筑面积的重置价格500元/m2,该建筑物经济寿命20年,残值率为5%。除()之外建筑物折旧可以分为三大类。
某交通运输企业2017年拥有整备质量10吨的载重汽车20辆,中型商用客车10辆,整备质量8吨的挂车3辆。该企业所在地载货汽车年税额20元/吨,中型客车年税额540元/辆。该企业当年应缴纳车船税()元。
甲公司持有在境外注册的乙公司100%股权,能够对乙公司的财务和经营政策实施控制。甲公司以人民币为记账本位币,乙公司以港币为记账本位币,发生外币交易时甲公司和乙公司均采用交易日的即期汇率进行折算。(1)20×9年10月20日,甲公司以每股2美元的价格购入
从下列各项活动的内容看,属于公安机关保护公共财产和个人合法财产的有()。
某国有公司司机甲下班后将本单位的小汽车作为出租车运营,收人归自己所有。甲以这种方式共计获利1万元。甲的行为()。
Somefuturologistshaveassumedthatthevastupsurgeofwomenintheworkforcemayportendarejectionofmarriage.Manywomen,
最新回复
(
0
)