设有如下程序: 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 A

admin2019-03-08  41

问题 设有如下程序:  
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 Intege,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

解析 在Visual Basic中调用过程时,参数有两种传递形式:按值传递(Byval)和按址传递(Byref),默认为按址传递。其中,当参数按址传递时,如果在引用该参数的过程中改变了形参的值,同时也就改变了传递参数时实参变量的值。本题中sV的参数m是按值传递的,n是按地址传递的,因此在sV中对m的改变不会影响实参x,对n的操作会影响实参y。
转载请注明原文地址:https://jikaoti.com/ti/e4m0FFFM
0

最新回复(0)