单项选择题

以下程序输出1到1000之间所有的偶数之和，请补充完该程序。
Private Sub Cotmand1_Click()
Dim x As Double
For i=0 To 1000
If______ Then
x=x+ i
End If
Next i
Print x
End Sub

A．i Mod 2= 0
B．x mod 2=0
C．I mod 2＜＞0
D．x mod 2＜＞0
<上一题 目录 下一题>
热门 试题

单项选择题
以下程序段的执行结果是 ______。 Dim A(3, 3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 3 - m + 1 Then A(m, n) =m + n Else A(m, n) = 0 End If Next n Next m For m = 1 To 3 For n = 1 To 3 Print A(m, n); Next n Print Next m
A．1 1 1
1 1 1
1 1 1
B．2 0 4
0 4 0
4 0 6
C．0 0 0
0 0 0
0 0 0
D．1 0 1
0 1 0
1 0 1
单项选择题
GUI的含义是______ 。
A．面向对象的程序设计
B．开放数据库连接
C．图形设备接口
D．图形用户界面
相关试题