首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Dim x As Integer, y As Integer, z As Integer Private Sub Command1_Click() Dim x As Integer x = 2: y = 3: z = 10
编写如下程序: Dim x As Integer, y As Integer, z As Integer Private Sub Command1_Click() Dim x As Integer x = 2: y = 3: z = 10
admin
2015-06-30
72
问题
编写如下程序:
Dim x As Integer, y As Integer, z As Integer
Private Sub Command1_Click()
Dim x As Integer
x = 2: y = 3: z = 10
Call S1(y)
Print x; y; z
End Sub
Public Sub S1(z As Integer)
x = x + y
y = y + z
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、2 6 10
B、2 3 10
C、5 6 10
D、2 13 10
答案
A
解析
程序初始,定义了全局变量x、y、z,x=y=z=0。在Command1_Click()过程中,又定义了一个局部变量x,它只能在Command1_Click()过程内部使用,给局部变量x赋值2,对全局变量y、z分别赋值为3、10。在过程s1中,x=x+y中的x是全局变量,未调用s1过程前,全局变量x=0,y = 3,z = 10。调用s1(y),全局变量x=0+y=0+3=3,y=y+y=3+3=6,z=10不变。
调用结束,回到Command1_Click()过程中,输出过程内的局部变量x,全局变量y和z,局部变量x为2,故输出结果为2,6,10,故选择A项。
转载请注明原文地址:https://www.kaotiyun.com/show/9VQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件需求分析阶段的工作,可以分为4个方面:需求获取、需求分析、编写需求规格说明书以及()。
表达式(7\3+1)*(18\-1)的值是______。
()属性用于设置组合框的风格。
已知代数式eXSin(30°)2x/(x+y)Lnx,则正确的VisualBasic表达式为()。
当循环队列非空且队尾指针等于队头指针时,说明循环队列已满,不能进行人队运算。这种情况称为【】。
当一个工程含有多个窗体时,其中的启动窗体是______。
数据的四种基本逻辑结构是指______。
有下列二叉树,对此二叉树前序遍历的结果为()。
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
在一个容量为32的循环队列中,若头指针front=3,尾指针rear=2,则该循环队列中共有______个元素。
随机试题
识读φ25F8/h8的含义。
下列作品属于郭沫若所创作的一组是()
很多蛋白质在水中能够形成稳定的溶液,这和蛋白质的理化性质有关,原因在于在蛋白质表面带有一定的电荷和蛋白质表面能形成维持其稳定的水膜,有时一些中性盐能够破坏这样的稳定因素,使蛋白质相互聚合沉淀达到分离蛋白的目的,这种蛋白分离的方法叫作
咬合过紧,一般不宜采用固定修复的原因是
下列评价方法中,属于互斥方案常用的经济效果静态评价方法的有()。
按照2007年中国银监会重新修订并发布的《商业银行资本充足率管理办法》的要求,商业银行的核心资本充足率不得低于(),资本充足率不得低于()。
高盛企业计划从国外引进生产一新项目,该项目分两期进行:预计第一期新项目产品在2007年年初投资,市场适销期为4年,新产品的生产可利用原有旧设备,该设备的原值220万元,税法规定的使用年限为6年,已使用1年,按年数总和法计提折旧,税法规定的残值为10万元。目
请结合实际,论述讲授教学法的适用范围和使用要求。
Itisnaivetoexpectthatanysocietycanresolveallthesocialproblemsitisfacedwith______.
Inafamilywheretherolesofmenandwomenarenotsharply【C1】______andwheremanyhouseholdtasksaresharedtoagreateror
最新回复
(
0
)