设有如下程序： Private Sub Form_Click() A=1 For i＝1 To 3 Select Case i Case 1,3 A＝A+1 Case 2,4 A＝A+2 End Select Next i Print A End Sub 程序运行后，单击窗体，则在窗体上显示的内容是

A．6

B．5

C．4

D．3

[单选题]有如下程序： Private Sub Form_Click() E=1：F=1 For i=1 To 3 E=E+F:F=F+E Next Print E；F End Sub 该程序的输出结果是A．6 6B．5 8C．13 21D．34 55

[单选题]设有如下程序：Private Sub Form_Click()D．im i As Integer，x As String,Y As Stringx=”ABCDEFG”F．or i=4 To 1 Step-1y=Mid(x，i，i)+yNext iPrint yE．nd Sub程序运行后，单击窗体，输出结果为A．ABCCDEDEFGB．AABBCDEFGC．ABCDEFGD．AABBCCDDEEFFGG

[单选题]有如下程序:Private Sub Form_Click()D．im i As Integer, Sum As IntegerSum=0F．or i=2 To 10If i Mod 2=0 And i Mod 3<>0 ThenSum=Sum+iE．nd IfNextPrint SumE．nd Sub程序运行后,单击窗体,输出结果为A．12B．30C．24D．18

[单选题]有如下程序： 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 i Print sum End Sub 程序运行后，单击窗体，输出结果为______。A．12B．30C．24D．18

[单选题]有如下程序： 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．12B．30C．24D．18

[单选题]设有如下程序：Private Sub Form_Click()D．im ary(1 To 5)As IntegerD．im i As IntegerD．im sum As IntegerF．or i=1 To 5ary(j)=i+1sum=sum+ary(i)Next 1Print sumE．ud Sub程序运行后，单击窗体，则在窗体上显示的是A．15B．16C．20D．25

[单选题]有如下程序：Private Sub Form_Click()D．im i As Integer，Sum As IntegerSum=0F．or i=2 To 10If i Mod 2＜＞0 And i Mod 3=0 ThenSum=Sum+iE．ndIfNextPrint SumE．nd Sub程序运行后，单击窗体，输出结果为A．12B．30C．24D．18

[单选题]有如下程序： 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．12B．30C．24D．18

[单选题]设有如下程序：Private Sub Form_Click()C．lsa$=”123456”F．or i=1 To 6Print Tab(12-i)；_____Next iE．nd Sub程序运行后，单击窗体，要求结果如图所示，则在_____处应填入的内容为A．Left(a$，i)B．Mid(a$，8-i，i)C．Right(a$，i)D．Mia(a$，7，i)

[单选题]请阅读程序：Private Sub Form_Click()m=1F．or i=4 To 1 Step-1Print Str(m)；m=m+1F．or j=1 To iPrint”*”；Next jPrintNext iE．nd Sub程序运行后，单击窗体，则输出结果是( )。A．1**** 2*** 3** 4*B．4* 3** 2*** 1****C．**** *** ** *D．* ** *** ****