首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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-07-11
36
问题
编写如下程序:
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/nKGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面不能在信息框中输出“VB”的是()。
设窗体文件中有下面的事件过程:PnvateSubCommandl_Click()DimSa%=100PrintaEndSub其中变量a和s的数据类型分别是()。
下面程序的执行结果是()。PrivateSubCommandl_Click()a=0k=lDoWhilek
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateYAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateSu
现有语句:Y=IIf(x>0,xMod3,0)设x=10,则Y的值是()。
有三个关系R、S和T如下:由关系R和s通过运算得到关系T,则所使用的运算为()。
在数据库设计中,将E-R图转换成关系数据模型的过程属于()。
在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,再编写如下程序:DimSSAsStringPrivateSubTextl_KeyPress(KeyAsciiAsInteger)
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateXyperecCodeAsInteger:CaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是
随机试题
()虽不能保证恒定的传动比,但传动平稳。
常引起子宫内膜增生的卵巢肿瘤是
为防止脐带脱垂,胎膜早破的孕妇,应采用的卧位是
(2005年)在双缝干涉实验中,两缝间距离为d,双缝与屏幕之间的距离为D(D>>d)。波长为λ的平行单色光垂直照射到双缝上,屏幕上干涉条纹中相邻暗纹之间的距离是()。
某工程桩基的基底压力p=120kPa,地基土为淤泥质粉质黏土;天然地基承载力特征值fak=75kPa,用振冲碎石桩处理后形成复合地基,按等边三角形布桩,碎石桩桩径d=0.8m,桩距s=1.5m,天然地基承载力特征值与桩体承载力特征值之比为1:4,则振冲碎
当仲裁委员会依法对合同争议作出裁决后,若一方当事人不执行此裁决,则另一方当事人有权请求()。
发电机是根据电磁感应原理,通过转子磁场和定子绕组的相对运动,将机械能转变为电能。其按照()可划分为汽轮、水轮、柴油和燃气轮发电机。大型锅炉的汽包吊装多数采用()方法。
对求助者形成初步印象的工作程序包括()。
WhatisTheWesternTeacher?
A、Approximately1.8milliontons.B、Approximately18milliontons.C、Approximately8milliontons.D、Approximately80millionto
最新回复
(
0
)