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

admin2013-04-11  33

问题 在窗体上绘制一个名称为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  s    End Sub    程序运行后,单击命令按钮,在窗体上显示的是

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

答案2

解析 本题考查通用过程的调用以及Mod函数的用法。“Mod”表示取模,fun过程的功能是当m可以被2整除时,返回2,否则返回1。程序利用了一个For,循环来调用该过程,最后的输出结果是1+2+1+2+1=7,选项B正确。
转载请注明原文地址:https://kaotiyun.com/show/37hp777K
0

最新回复(0)