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

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

admin2009-02-13  52
问题 在窗体上画一个名称为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_Click(   )            Dim i As Integer，s As Integer            S=0            For i=1 To 5               s=s+fun(i)            Next            Print 3         End Sub        程序运行后，单击命令按钮，在窗体上显示的是
选项 A、6
B、7
C、8
D、9
答案2
解析 本题中的通用过程fun(ByVal m As Integer)作用是判断参数m，如果 m为偶数则函数返回2，如果m为奇数则函数返回1。在i=1 To 5的fun(ByVal m As Integer)调用中，共有偶数两个，奇数三个，所以最后结果为7。
转载请注明原文地址:https://kaotiyun.com/show/EK2p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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