下列程序段，运行后窗体上输出结果是( )。

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

Printx

E．nd Sub

A．1

B．True

C．False

D．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 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 ( ) for j = 1 To 10 if j Mod 3 ＜＞ 0 then a =a+j/3 Next j Print aEnd SubA．20B．10C．3D．9

[单选题]下列程序段的运行结果是：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

[单选题]下面程序运行后，窗体中显示______。Private Sub Command1_ Click() a＄ = "*": b＄ = "＄ for k = 1 To 3 x＄ = String＄(Len(a＄) +k, b＄) Print x＄; Next k PrintEnd SubA．*** ** ***B．*＄*＄*＄C．1*＄2*＄3*＄D．＄＄＄＄＄＄＄＄＄

[单选题]下列程序的运行结果是 ______。Private Sub Command1_ Click () a =1: b=1 for i = 1 To 3 a= a+ b: b=b+ a Next i Print a, bEnd SubA．6 6B．5 8C．13 21D．34 55

[试题]下列程序的输出结果是______。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_lick()F．or i= 1 To 4x= 4F．or j =1 To 3x =3F．or k=1 To 2X= K+5Next kNext jNext iPrint xE．nd Sub

[单选题]下面程序段,运行后的结果是Private Sub Command1_ClickD．im b%(1 To 4), i%, t#F．or i=1 To 4b(i) =iNextt=Tof(b() )Print "t="; t,E．nd SubF．unction Tof(a() As Integer)D．im t#, i%t=1F．or i=2 To UBound(a)t=t  a(i)NextTof=tE．nd FunctionA．t=18B．t=24C．t=30D．t=32