2. 计算机
  3. 已知事件对应的程序代码如下： Private Sub Command0_Click() Dim J As Integer J = 100 Call GetData(J) MsgBox J End Sub Private Sub Ge

已知事件对应的程序代码如下： Private Sub Command0_Click() Dim J As Integer J = 100 Call GetData(J) MsgBox J End Sub Private Sub Ge

admin2020-11-25  114
问题 已知事件对应的程序代码如下：
Private Sub Command0_Click()
   Dim J As Integer
   J = 100
   Call GetData(J)
   MsgBox J
End Sub
Private Sub GetData(ByRef f As Integer)
   f = f + 120
End Sub
则程序的输出是
选项 A、100
B、120
C、220
D、运行出错
答案C
解析 根据题意，程序代码中用Sub定义了2个过程：Command0_Click()和GetData（）。其中GetData的功能是将参数f的值增加120后再赋给f，且f为ByRef类型（即按地址传递）的参数，可将参数在过程中的改变传递到过程外。在过程Command0_Click中定义了整型数据J=100，并将J作为GetData（）函数的参数，在GetData（）过程中形参为100且此参数为地址传递，经GetData（）过程处理后增加120，变成220，同时在过程外部的J的值也变为220。最后输出变量J，因此选择C选项。
转载请注明原文地址:https://www.kaotiyun.com/show/XISp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)