问题
单项选择题
编写如下事件过程和函数过程:
Private Sub Form_Click()
Dim num() To 6)As Single
num(1)=103:num(2):190:num(3)=0
num(4)=32:num(5)=-56:num(6)=100
Print
Print p2(6,num())
End Sub
Private Function p2(ByVal n As Integer,number() As Single)As Integer
p2=number(1)
For i=2 To n
If number(j)<p2 Then p2=number(j)
Next i
End Function
程序运行后窗体上显示的值是( )。
A) -56
B) 0
C) 103
D) 190
答案
参考答案:A
解析: 此题需要仔细分析p2函数的数学意义,不难发现返回值为前n个数中的最小值,所以输出的结果是num数组前6项中的最小值,即为num( 5) =-56。