首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1 Click() Dim x As Integer,y As Integer x=InputBox("输入第一个数") Y=InputBox("输入第二个数") Call f(x,y) Print x
编写如下程序: Private Sub Command1 Click() Dim x As Integer,y As Integer x=InputBox("输入第一个数") Y=InputBox("输入第二个数") Call f(x,y) Print x
admin
2018-06-21
39
问题
编写如下程序:
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/RpGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生20个0~1000的随机整数,放入一个数组中,然后输出这20个整数的平均值。程序运行后,单击命令按钮(名称为Commandl,标题为”输出平均值”),即可求出其平均
已知图片框Picturel中已装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是()。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指()。
有如下程序:PrivateSubCommandl_Click()DimiAsInteger,jAsIntegerDimSumAsIntegern=lDo
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()Dimx%,y%,z%x=InputBox(“请输入第1个整数”)Y=I
如果在窗体模块中所有程序代码的前面有语句:DimX,则x是()。
设a=10,b=5,C=l,执行语句Printa>b>e后,窗体上显示的是()。
以下选项中,不合法的VisualBasic的变量名是
如果在列表框List1中没有选中项目,则List1.ListIndex的值为
随机试题
良性前列腺增生通常发生于
TheiPad1TheiPadisatabletcomputer(平板电脑)designedanddevelopedbyApple.Itisparticularlymarketedasaplatformfor
下列哪种表现是肺血栓栓塞症(PTE)的唯一或首发症状
真心痛可选择
从事工艺、设备、产品及包装物设计,应当按照减少资源消耗和废物产生的要求,优先选择采用()、无毒无害或者低毒低害的材料和设计方案,并应当符合有关国家标准的强制性要求。
( )是用于项目进度计划、动态控制、资源管理和费用控制的综合进度计划管理软件,也是目前国内大型工程项目中应用最多的进度计划管理软件。
按照布鲁纳的观点,学习学科的基本结构的必要性有哪些?
将考生文件夹下SMITH文件夹中的文件COUNTING.WRI移动到考生文件夹下OFFICE文件夹中,并改名为IDEND.WRI。
DifferentMediaWiththeintroductionofradio,/newspaperpublisherswonderedhowbroadcastingwouldaffectthem./Manyfear
HowMarketersTargetKidsA)Kidsrepresentanimportantdemographictomarketersbecausetheyhavetheirownpurchasingpower,t
最新回复
(
0
)