单项选择题编写如下事件过程和函数过程: Private Sub Form_Chck() DimBum(1 To 6)As Single num(1)=103:num(2)=190:num(3)=0 Bum(4)=32:num(5)=-56:num(6)=100 Print Pdnt p2(6,hum()) End Sub Private Function p2(ByVal n As Integer,number()As Single)As Integer p2=number(1) Forj=2 Ton lfnumber(j)<p2 Thenp2=number(j) Next j End Function 程序运行后窗体上显示的值是( )。
单项选择题在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码: Private Sub Command1_Click( ) k = 0 Do While k < 70 k = k + 2 k = k * k + k a = a + k Loop Text1.Text = a End Sub 程序运行后,文本框中显示________。 (A) 20 (B) 32 (C) 44 (D) 78