首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2015-10-23
71
问题
编写如下程序:
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://www.kaotiyun.com/show/XDLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序运行后的结果是()。PrivateSubForm_Click()DimsAsInteger,kAsInteger,iAsInteger,nAsIntegers=1
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程:PrivateSubCommandl_click()CommonDialogl.Friter="AllFiles(*.*)|*.*
执行以下程序段后,变量c$的值为()。S$="VisualBasicProgramming"b$="Quick"c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,12)
下列程序段的执行结果为(),n=0Fori=1To3Forj=5To1Step-1n=n+1Nextj,iPrintn;j;I
设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,则另一命令按钮的名称可能是()。
下面程序是用来打印九九乘法表的,请填空。DimiAsInteger,jAsInteger,Str1$Str1=""Fori=1To9Forj=1To9If【】ThenStr1=Str1+Str$(
下面程序运行后,输出的结果是Dimarr(3,3)Forj=1To3Fork=1To3Arr(j,k)=(j-1)*3+kNextkNextjForj=2To3Forj=2To
在窗体上添加一命令按钮,名称为Command1,然后为该命令按钮编写如下事件过程,该过程的执行结果为OptionBase1PrivateSubCommand1_Click()DimaAsVarianta=Array(1,2,3,
阅读下面的程序段:Fora=1To2Forb=1ToaForc=bTo2i=i+1NextNextNextPrinti执行上面的3重循环后,i的值为
与键盘操作有关的事件有KeyPress、KeyUp和KeyDown事件,当用户按下并且释放一个键后,这三个事件发生的顺序是
随机试题
巴西首都里约热内卢于2016年举办了第31届夏季奥林匹克运动会。()
最小最大后悔值法
“君何患焉”中的“焉”意思是____________。
血分证的辨证要点包括
超声心动图提示左室壁局部于收缩期向外突出呈矛盾运动提示
仲裁协议的作用包括( )。
行政主体承担行政责任的具体方式中包括()。
教师职业的基本要求是()。
改革开放以来,中国农学会__________“献身、创新、求实、协作”的宗旨,始终不渝地坚持以推动农业科技进步、促进农村发展为己任,大力开展学术交流和科技普及,积极__________和举荐人才,为提高广大农民科技素质、加快农业科技进步作出了重要贡献。
Carbonmonoxidepoisoningcausesdeathandinjuriesthroughouttheworld.Thepoisongashasbeenaproblemsincehumansfirstb
最新回复
(
0
)