首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名为Command1的命令按钮,然后编写以下程序: Private Sub Command1_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k
在窗体上画一个名为Command1的命令按钮,然后编写以下程序: Private Sub Command1_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k
admin
2019-03-14
65
问题
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:
Private Sub Command1_Click()
Dim M(10)As Integer
For k=1 To 10
M(k)=12-k
Next k
x=8
Print M(2+M(x))
End Sub
运行程序,单击命令按钮,在窗体上显示的是( )。
选项
A、6
B、5
C、7
D、8
答案
A
解析
从程序中可知,数组M元素M(1)~M(10)的值为11、10、9、8、7、6、5、4、3、2。则M(8)的值为4,M(2+M(8))即M(2+4),即M(6)。M(6)的值为6。因此窗体上显示为6。
转载请注明原文地址:https://kaotiyun.com/show/kpFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序:PrivateSubForm_Click()DimmAsSingle,nAsStringDimflagAsIntegerm=InputBox("请输入一个单精度数")n=
编写如下程序:PrivateSubForm_Click()k=0Forj=1To2Fori=1To3k=i+1Nexti
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ...EndSub其中参数KeyCode的值表示的是发生此事件时(
(1)在名称为Form1的窗体上添加一个名称为Picture1的图片框(PictureBox),高、宽均为1000。在图片框内再添加一个有边框的名称为Imagel的图像框(Image)。并通过属性窗几把考生文什火下的图标文件Pointl1(香蕉图标)装入图
下列不属于计时器控件属性的是
为了读取数据,需打开顺序文件"D:\data5.txt",以下正确的命令是
(1)在名称为Form1的窗体上添加两个名称分别为Frame1、Ftame2的框架,标题分别为“字号”、“修饰”;在Frame1中添加两个单选按钮,名称分别为Option1、Option2,标题分别为“10号字”、“20号字”,且标题显示在单选按钮的左边
设有表达式:A=IIf(x>y,"go","back")。以下与该表达式具有相同功能的语句是
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象"的描述中,错误的是
随机试题
A.支链氨基酸B.谷氨酸钠C.新霉素D.乳果糖增加肠道氨排出的药物是
胃溃疡的x线直接征象为
对尿瘘患者的心理护理中,下列哪项不恰当
(2016)下列不属于系统误差来源的是()。
设计人交付设计文件完成合同约定的设计任务后,发包人从项目预期效益考虑要求增加部分专业工程的设计内容。由于设计人当时承接的设计任务较多,在发包人要求的时间内无力完成变更增加的工作,故发包人征得设计人同意后,将此部分的设计任务委托给另一设计单位完成。变更设计完
施工噪声的主要类型有()。晚间作业时间不得超过()。
2018年7月1日,A、B两公司签订了一份价值100万元的货物买卖合同。合同约定:A公司于2018年7月15日向B公司交付全部货物,交付地点为B公司仓库;B公司在验货合格后10日内一次性支付全部货款;任何一方如违约,应向守约方支付违约金10万元。合同订立后
孔庙有保存全国数量最多的汉碑,有我国第一碑林之称。孔庙是我国仅次于北京故宫的古建筑群。()
设计数据库的存储结构属于()。
Thebesttitleforthispassageis______.Whichofthefollowingdoesn’tsharethesamemeaningwiththeothers?
最新回复
(
0
)