编写如下事件过程和函数过程:
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