[单项选择题] 以下程序输出1到1000之间所有的偶数之和，请补充完该程序。 Private Sub Cotmand1_Click()Dim x As DoubleFor i=0 To 1000

[单项选择题] 以下程序输出1到1000之间所有的偶数之和，请补充完该程序。 Private Sub Cotmand1_Click()Dim x As DoubleFor i=0 To 1000 If______ Then x=x+ i End IfNext iPrint x End Sub

A．i Mod 2= 0

B．x mod 2=0

C．I mod 2＜＞0

D．x mod 2＜＞0