设有如下程序: Private Sub sV(ByVal m As Integer,n As Integer) m=m*2 n=n-5 Print m;n End Sub Private Sub Form_Click() Dim x As Integer

admin2020-04-18  25

问题 设有如下程序:
Private Sub sV(ByVal m As Integer,n As Integer)
m=m*2
n=n-5
Print m;n
End Sub
Private Sub Form_Click()
Dim x As Integer y As Integer
x=10
y=15
sV x,y
Print x;y
End Sub
运行程序,单击窗体,输出结果为

选项 A、20 10
10 10
B、10 15
20 10
C、20 15
10 15
D、20 10
20 10

答案A

解析 函数传递参数有值传递和引用传递。默认是引用传递。sV(ByVal m As Integer,n As Integer)函数中m为值传递,n为引用传递。值传递不改变实参值。即在 Form_Click()过程中调用sV不会改变x的值。选A。
转载请注明原文地址:https://jikaoti.com/ti/bCx0FFFM
0

最新回复(0)