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

admin2012-03-22 53

问题在窗体上绘制一个名称为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

答案B

解析

转载请注明原文地址:https://kaotiyun.com/show/eHhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类