在窗体上画一个名称为Commandl的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function fun(By Val m As Integer) If m Mod 2=0 Then f

admin2013-04-11  45

问题 在窗体上画一个名称为Commandl的命令按钮,然后编写如下通用过程和命令按钮的事件过程:    Private Function fun(By Val m As Integer)        If m Mod 2=0 Then            fun=2        Else            fun=1        End If  End Function  Private Sub Commandl_Click()        Dim i As Integer,s As Integer        s=0        For i=1 To 5            s=s+fun(i)        Next            Print s    End Sub    程序运行后,单击命令按钮,在窗体上显示的是______。

选项 A、 6
B、7
C、8
D、9

答案B

解析 本题中fun函数的功能是偶数时返回2,奇数时返回1。而1到5中,有三个奇数,两个偶数。所以s是三个1和两个2之和。故s=7。
转载请注明原文地址:https://jikaoti.com/ti/cr60FFFM
0

最新回复(0)