编写如下事件过程和函数过程： Private Sub Form_Click()

问题补充：

单项选择题:

编写如下事件过程和函数过程：

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。