首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim x As Integer, y As Integer x=InputBox("输入第一个数") y=InputBox("输入第二个数") Call f(x,
编写如下程序: Private Sub Command1_Click() Dim x As Integer, y As Integer x=InputBox("输入第一个数") y=InputBox("输入第二个数") Call f(x,
admin
2018-12-20
52
问题
编写如下程序:
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x=InputBox("输入第一个数")
y=InputBox("输入第二个数")
Call f(x, y)
Print x, y
End Sub
Sub f(a As Integer, ByVal b As Integer)
a=a * 2
x=a+b
b=b+100
End Sub
程序运行后,单击命令按钮Command1,并输入数值10和15,则输出结果为( )。
选项
A、10 115
B、20 115
C、35 15
D、20 15
答案
D
解析
程序中过程f的参数a默认为按址传递,参数b指定按值传递,因此调用f(x, y)时,x的值会受到影响,y的值不会。程序中输入10和15,则x=10,y=15。调用f(x, y),在过程中a=a*2,即a=10*2=20,变量x是过程f中的局部变量,没有用处可不用理会,b=b+100,即b=15+100=115。a的值即按钮单击事件中变量x的值,因此x=20,而y的值仍是原来的值15,因此Print x,y输出20 15。
转载请注明原文地址:https://kaotiyun.com/show/7fFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名为Command1的命令按钮,然后编写如下代码:OptionBase1PrivateSubCommand1_Click() Dima a=Array(1,2,3,4) j=1 Fori=4T
为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为( )。
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click() m=-3.6 IfSgn(m)Then n=Int(m) Else n=Abs(m) EndIf
为了暂时关闭计时器,应把它的一个属性设置为False,这个属性是
软件需求规格说明书的作用不包括
数据库应用系统中的核心问题是( )。
下面不能作为结构化方法软件需求分析工具的是
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
设循环队列存储空间为Q(1:50)。初始状态为front=rear=50。经过一系列入队和退队操作后,front=14,rear=19,则该循环队列中的元素个数为
随机试题
社会诸要素之间在相互作用过程中形成的相对稳定的关系称为【】
患者女性,37岁。妊娠32周,因妊娠期高血压疾病需选择合适时机进行剖宫产手术,对胎儿进行成熟度评估。胎儿肺成熟可疑,若选择终止妊娠,应重点防范的情况是
A.4~5天B.7天C.9天D.12天E.14天
AB的方位角为134°,测得B点水平角(左角)∠ABC=89°,则CB的象限角余角为()。
风险值是风险评价表征量,包括()。
甲公司是汽车制造业一般纳税人,2016年8月,因经营需要拟新增办公楼一栋,对新增办公楼涉税政策,向税务师咨询如下问题:若8月购买办公楼并投入使用,增值税专用发票注明价格2000万,税额为220万,增值税专用发票经认证,说明进项税额分别在何时抵,并计算抵
对民办学校重大问题拥有决策权的是()。
有一个长方体容器,长40厘米,宽30厘米,高10厘米,里面的水深6厘米(最大面为底面)。如果把这个容器盖紧,再竖起来(最小面为底面),里面的水深是多少厘米?
(2019年河北事业)汉代乐府民歌在中国诗歌发展史上占有重要的地位。下列作品中叙述了一对青年男女的爱情悲剧,被誉为汉乐府叙事诗发展高峰的是()。
Writingforanhistoricalseriesistricky,andtheoutcomeisnotalwaysasuccess.ThebestoverallEuropeanhistoryinEnglis
最新回复
(
0
)