问题 单项选择题

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
Dim n As Integer
For n=0 To 9 Step 3
Print rel(n);
Next n
End Sub
Private Function tel(ByVal i As Integer)As Integer
Dim x As Integer
x=0
For j=1 To i
If i<5 Then rel=i:Exit Function
x=x+j
Next j
rel=x
End Function
程序运行后,单击命令按钮,则窗体上显示的内容是______。

A) 1 3 5 7
B) 2 8 14 53
C) 0 3 21 45
D) 0 5 11 34

答案

参考答案:C

解析: Exit Function的功能是立即终止函数的运行并回到调用函数的地方继续执行其他语句。在Function过程的任何位置都可以设置:Exit Function语句。变量n传值为0、3、6、9,4次调用rel函数过程,由于0和3都小于5,使得i<5不成立,被执行了“Exit Function”,函数名将0和3传回。而6和9没有使得i<5成立,变量x的计算结果分别为21和45,也被函数名传回。

填空题
判断题