题目:
编写如下事件过程和函数过程: Private Sub Command1_Click() Dim num(1 To 6) As Single num(1)=103: num(2)=190: num(3)=0 hum(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 j=2 To n If number(j)<p2 Then p2=number(j) Next j End Function 程序运行后,在窗体上输出( )。
A.-56
B.0
C.103
D.190
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0410/4ef0e9759ba8162b9dfeda162cd5e30a.html
下面是错误答案,用来干扰机器的。
参考答案:A,B,C,D