首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Private Sub Form_Click() Dim x As Integer,y As Integer x=32:y=42 Call PCS(x,y) Print x;y End Sub Sub PCS(ByVal n As Intege
阅读程序: Private Sub Form_Click() Dim x As Integer,y As Integer x=32:y=42 Call PCS(x,y) Print x;y End Sub Sub PCS(ByVal n As Intege
admin
2016-06-22
30
问题
阅读程序:
Private Sub Form_Click()
Dim x As Integer,y As Integer
x=32:y=42
Call PCS(x,y)
Print x;y
End Sub
Sub PCS(ByVal n As Integer,ByVal In As Inte
ger)
n=n Mod 10+10
m=m Mod 10+10
End Sub
运行程序,单击窗体,输出结果为( )。
选项
A、2 32
B、32 42
C、2 3
D、12 3
答案
B
解析
单击窗体时,Form_Click()事件被触发,在Form_Click()事件中,定义了两个整型变量x和y,其初始值分别为32和42。通过执行语句“Call PCS(x,y)”来调用过程“PCS”,在调用过程“PCS”时伴随参数传递,在过程“PCS”中,形参n和m前使用ByVal,表示参数传递使用的是单向值传递,在被调过程“PCS”中,对形参的改变,不会影响实参x和y,故本题中x和y的值不变,所以B选项正确。
转载请注明原文地址:https://kaotiyun.com/show/c0Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下函数过程PrivateFunctionFun(a()AsInteger,bAsString)AsIntegerEhdFunction若已有变量声明:Dimx(5)AsInteger,nAs
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然后编写如下代码:SubS(xAsInteger,YAsInteger)StaticzAsIntegery=x*x+
阅读程序:Functionfac(ByValnAsInteger)AsIntegerDimtempAsIntegertemp=1Fori%=1Tonte
设有关系R和s,关系代数表达式为R-(R-S)表示的是
数据结构分为线性结构和非线性结构,带链的队列属于______。
设已打开5个文件,文件号为1,2,3,4,5。要关闭所有文件,以下语句正确的是
下列叙述中错误的是
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是
在下列选项中,哪个不是一个算法一般应该具有的基本特征()。
随机试题
输气站场周围建筑物距场内最近地区工艺设备的距离为30m。()
By【B1】______afewsimpletechniques,parentswhoreadtotheirchildrencangreatlyincreasetheirchildren’slanguagedevelopm
病人,男性,58岁,在无明显诱因下,反复出现无痛性血尿两个月,他很焦虑,要求医生查明原因。该病人需要做膀胱镜检查,逆行肾盂造影,检查前一天的护理哪一项必要()
患者,男,41岁。无痛性进行性双侧颈部淋巴结肿大1个月,查体发现双侧颈部各1个2cm×2cm大小淋巴结,活动、无压痛,余浅表淋巴结未触及,心肺未见异常,腹平软,肝脾肋下未触及,临床疑诊淋巴瘤。问题3:为了临床分期,需要首选的进一步检查是
正常分娩胎膜自然破裂多在
Manydreams________seemimpossible,thenimprobable,andeventuallyinevitable.
1960年,我国对国民经济实行调整的方针是()。
以下关于图像文件格式的叙述中,错误的是______。
PassageThreeThesteakhousemaybeAmerica’sgreatestsingleachievement.Sure,there’sthatConstitutioneveryone’ssoimp
Thegovernmenthaslauncheditsconsultationonbettermeasuresofchildpoverty,butitreallyhastobeasked,betterforwhom
最新回复
(
0
)