下列程序段，运行后窗体上输出结果是 Private Sub Commnad1_Click() a=5∶b=4∶c=3∶d=2 x=3＞2*b Or a=c And b＜＞c Or c＞d Print X End SubA. 1 B. True C. False D. 2

[单选题]下列程序段，运行后窗体上输出结果是( )。Private Sub Command1_Click()a=5:b=4:c=3:d=2x=3＞2*b Or a=c And b＜＞c Or c＞dPrintxE．nd SubA．1B．TrueC．FalseD．2

[单选题]下列程序段运行后窗体上输出结果为( )。 Private Sub Command1 Click() a=5：b=4：c=3：d=2 X=3＞2*b Or a=c And b＜＞C Or c＞d Print X End SubA．1B．TrueC．FalseD．2

[单选题]下列程序段运行后窗体上输出结果为( )。 Private Sub Command1_Click() a=5: b=4: c=3: d=2 x=3＞2*b Or a=c And b＜＞c Or c＞d Print x End SubA．1B．TrueC．FalseD．2

[单选题]运行下列程序，单击窗体后输出的结果是( )。Private Sub Form_Click()D．im aD．im s As Integer, i As Integera = Array(1, 2, 3, 4, 5, 6)s = 1F．or i = 5 To 1 Step -2s = s * a(i)Next iPrint sE．nd SubA． 15B． 48C． 120D． 720

[单选题]执行下面的程序，单击窗体后窗体消息框内显示结果是( )。 PRIVATE SUB FORM_CLICK() DIM STR AS STRING, K AS INTEGER STR="AB" FOR K = LEN(STR) TO 1 STEP -1 STR=STR&CHR(ASC(MID(STR, K, 1)) +K) NEXT K MSGBOX STR END SUBA．ABCEB．ABCDC．ABDBD．ABFB

[试题]下列程序的输出结果是______。Private Sub Command1_Click()D．im arr(1To 10)F．or i＝1 To 10arr(i)＝iNext iF．or Each i In arr()arr(i)＝arr(i)*2+1Next iMsgBox arr(7)E．nd Sub

[单选题]下列程序段的运行结果是：Private Sub Command1_Click() Dim n AS Integer I =21: n = 3 do while I＞n I=I- n Loop Print IEnd Sub在窗体上打印的结果是______。A．3B．5C．6D．8

[单选题]下列程序运行时输出的结果是Option Base 1Private Sub Form_Click()D．im x(10) As Integer,y(5) As IntegerF．or i=1 to 10x(i)=10-i+1NextF．or i= 1 to 5y(i)=x(2*i-1)+x(2*i)NextF．or i= 1 to 5Print y(i)NextE．nd SubA．3 7 11 45 19B．19 15 11 7 3C．1 3 5 7 9D．不确定的值

[单选题]以下程序运行后输出的结果是______。 Private Sub Form. _Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print a End SubA．10B．15C．80D．100

[单选题]下面程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form_Click Dim I As Integer Dim sum As Long Dim t1 As Long t1=1:sum=0 For 1=1 To 3 t1=t1*I sum=sum+t1 Next I Print sum End SubA．3B．9C．5D．6