2. 计算机
  3. 编写如下事件过程和函数过程： Private Sub Command1_Click() Dim num(1 To 6) As Single num(1)=103: num(2)=190: num(3)=0 hu

编写如下事件过程和函数过程： Private Sub Command1_Click() Dim num(1 To 6) As Single num(1)=103: num(2)=190: num(3)=0 hu

admin2010-09-11  26
问题 编写如下事件过程和函数过程：     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
答案A
解析 分析程序，函数p2的作用是找出指定数组中最小的数并返回。p2函数指定第1个参数以传值的形式传递，第2个参数以传地址的形式传递。因此，在命令按钮单击事件中调用函数p2时，参数6是以传值的形式传给形参n，数组num以传地址的形式传给形参number。所以题中整个程序要实现的功能是找出数组num中最小的数并输出，因此最后输出“-56”。
转载请注明原文地址:https://jikaoti.com/ti/Iig0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)