单项选择题
有如下程序: Private Sub Form_Click() Dim i As Integer,Sum As Integer Sum=0 For i=2 To 10 If i Mod 2<>0 And i Mod 3=0 Then Sum=Sum+i End If Next Print Sum End Sub 程序运行后,单击窗体,输出结果为
A.12
B.30
C.24
D.18
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
为了提高测试的效率,应该
A.随机选取测试数据
B.取一切可能的输入数据作为测试数据
C.在完成编码以后制定软件的测试计划
D.集中对付那些错误群集的程序
点击查看答案&解析
单项选择题
单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click() Print Fun(23,18) End Sub Public Function Fun(m As Integer,n As Integer)As Integer Do While m<>n Do While m>n:m=m-n:Loop Do While m<n:n=n-m:Loop Loop Fun=m End Function
A.0
B.1
C.3
D.5
点击查看答案&解析
相关试题
以下用户自定义函数 Function Func(a A...
在窗体上画一个名称为Command1的命令按钮...
在窗体上画一个列表框和一个命令按钮,其名...
在窗体上画一个命令按钮Command1和两个文...
在窗体上画一个名称为Command1的命令按钮...