2. 计算机
  3. 在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程； Private Function fun(ByVal m As Integer) If m Mod 2=0 Then f

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

admin2010-09-11  27
问题 在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程；    Private Function fun(ByVal m As Integer)        If m Mod 2=0 Then             fun=2        Else             fun=1        End If    End Function    Private Sub Command1_C1ick()        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
解析 子函数的功能为：当m为偶数时返回2，当m为奇数时返回1。1～5中有2个偶数，3个奇数，变量s的值为1+2+1+2+1=7。
转载请注明原文地址:https://jikaoti.com/ti/Gtg0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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