问题 单项选择题

运行以下程序时,由键盘为变量load输入的数据为20,输出结果为______。
Private Function Wei(load As Integer),Money As Single
If load<20 Then
Money=load/2
Else
Money=20+load
End if
Wei=Money
End Function
Private Sub Form _Click()
Dim load As Integer,fee As Single
load=InputBox(“请输入一个数:”)
fee=Wei(loaD)
Print fee
End Sub

A.10

B.20

C.30

D.40

答案

参考答案:D

解析: 本题的程序中调用通用函数过程,当进行虚实结合后,变量load的值为20。当执行Wei函数时,首先判断条件load<20为假,执行语句Money=20+load,使Money的值为40,接着执行语句Wei=Money,使函数名的值为40,执行到语句End Function则返回到调用它的事件过程,将函数值赋给变量fee,最后输出变量 fee的值40。

判断题
选择题