Down综合征主要体内少了一条性染色体；Turner综合征主要是由于体内多了一条21号染色体()

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