有如下程序:Private Sub Form_Click( )Dim i As Integer Sum As Integer Sum = 0 For i = 2 To

有如下程序： 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

您可能感兴趣的试题

假定有如下的窗体事件过程：Private Sub Form_Click（)a$="Microsoft Visual Basic"b$=Right（a$,5)

答案解析
（8 ）有如下程序：Private Sub Form_Click （）n=10i=0Doi=i＋nn=n－2Loop While n>2Print iEnd Su

答案解析
编写如下程序:Private Sub Form_Click()a$=54321:b$=abcdeFor j=1 To 5Print Mid$(a$ 6-j 1)

答案解析
假定有如下的窗体事件过程:Private Sub Form_Click()a$=Microsoft Visual Basic$=Right(a$ 5)

答案解析
P74. 在窗体中有一个文本框 Text1 编写事件代码如下 Private Sub Form_Click X= val()

答案解析
设有如下程序:Option Base 0Private Sub Form_Click( )Dim aDim i As Integera=Array(1 2 3 4 5

答案解析
下列程序: Private Sub Form_Click ()

答案解析