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

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

admin2021-07-08  22
问题 已知事件对应的程序代码如下：
    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://jikaoti.com/ti/pm90FFFM
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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