下列程序段运行后输出的结果是（）。 Private Sub Form_Click Dim X#, Y# X = 5: Y = 6 Print X + Y = 11 End SubA、X+Y=11B、5+6=11C、11D、True
下列程序段运行后输出的结果是（）。 Private Sub Form_Click Dim X#, Y# X = 5: Y = 6 Print X + Y = 11 End Sub
- A、X+Y=11
- B、5+6=11
- C、11
- D、True
相关考题：
下列程序段，运行后窗体上输出结果是 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=0For j=1 to 15a=a+j mod 3Next jPrint aEnd Sub程序运行后，单击窗体，输出结果是A ）105B)1C)120D)15
设有如下程序：Private Sub Form_C1ick()Dim s As Long，f As LongDim n As Integer，i As Integerf=1n=4For i=1 To nf=f*is=s+fNext iPrint sEnd Sub程序运行后，单击窗体，输出结果是A．32B．33C．34 0)35
有如下程序：Private Sub Form_C1ick()E=1:F=1For j=1 To 3E=E+F:F=F+ENextPrint E;FEnd Sub该程序的输出结果是A．6 6B． 5 8C． 13 21D．34 55
设有如下程序： Private Sub Form. Click（ ） Dim s As Long，f As Long Dim n As Integer，i As Integer f=1 n=4 For i=1 To n f=f*i s=s+f Next i Print s End Sub 程序运行后，单击窗体，输出结果是（ ）。A.32B.33C.34D.35
阅读程序：Private Sub Form. Click（ ）a=0For j=1 To 15a=a+j Mod 3Next jPrint aEnd Sub程序运行后，单击窗体，输出结果是（ ）。A.105B.1C.120D.15
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Do Whileb＞=0c=a+bLoopEnd Sub程序运行后，依次输入3，2，1，0，-1，-2，则输出结果是( )。
下列程序段的运行结果是：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 search(a()As Variant，ByVal key As Variant，index%) Dim I％ For I = Lbound(a)To Ubound(A)If key=a(I)Then index=I Exit Sub End If Next I index=-1 End Sub Private Sub Form_Load() Show Dim b()As Variant Dim n As Integer b=Array(21，64，92，15，72，38，45，72) Call search(b， 45， n) Print n End Sub 程序运行后，输出的结果是A．2B．6C．10D．12
阅读程序：Private Sub Form_ Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print aEnd Sub 程序运行后，单击窗体，输出结果是______。A．105B．1C．120D．15
下列程序段，运行后窗体上输出结果是( )。Private Sub Command1_Click()a=5:b=4:c=3:d=2x=3＞2*b Or a=c And b＜＞c Or c＞dPrintxEnd SubA．1B．TrueC．FalseD．2
有如下程序： Private Sub Form_Click() E=1:F=1 For j=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 Command1_ Click() a = 0 for 1=15 To 15 Step- 2 a = a +1 Next I Print a, IEnd Sub发生Command 1的单击事件后，程序的输出结果是 ______。A．0 13B．15 13C．0 15D．15 15
以下程序运行后的输出结果是______。 Private Sub Form_ Click() y=1 ：x=2 Print Iif(x＞=y，x，y) End SubA．0B．1C．2D．3
有如下程序:Private Sub Form_Click()E=1:F=1For j=1 To 3E=E+F:F=F+ENextPrint E;FEnd Sub该程序的输出结果是A．6 6B．5 8C．13 21D．34 55
以下程序运行后输出的结果是______。 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 Commandl_Click ch$=“ABCDEF” proc ch：Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=sMid(ch，k，1) Next k ch=s End Sub A．ABCDEF B．FEDCBA C．A D．F
下列程序 Private Sub form_Click() score=Int(Rnd * 10)+80 Select Case score Case Is＜60:a$＝"F" Case 60 To 69:a$＝"D" Case 70 To 79:a$＝"C" Case 80 To 89:a$="B" Case Else:a$＝"A" End Select Print a$ End Sub 运行时输出的结果是A．FB．DC．CD．B
下列程序： Private Sub Command1_Click() a=InputBox("请输入") b=InputBox("请输入") Print=a+b End Sub 运行时输入3和4，输出的结果是A．7B．34C．3+4D．出错
下列程序运行后的输出结果是______。Private Sub f(k,s) s = 1 for j = 1 To k s=s*j Next jEnd SubPrivate Sub Command1_ Click () Sum = 0 for i = 1 To 3 Call f(i, s) Sum = Sum + s Next i Print Sum End SubA．0B．3C．6D．9
下面程序运行后的输出结果是______。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 arr(1 To 10)For i=1 To 10Next iFor Each i In arr()Next iEnd Sub
下面程序运行后，输出结果是( )。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer，I As Integer Callmysub(a()，5) Mysuba() ForI=1 to 4 PrinA．5101520B．2468C．出错D．0000
设有如下程序：Private Sub Form. Click（ ）Dim s As Long，f As LongDim n As Integer，i As Integerf=1n=4For i=1 To nf=f*is=s+fNext iPrint sEnd Sub程序运行后，单击窗体，输出结果是（ ）。A.32B.33C.34D.35
下列程序运行后的输出结果是 Private Sub Command1_Click() For k=3 To 1 Step-1 x=String(k，"*") Print x Next End SubA．* * * * * *B．1 * 2 * 3 *C．3 * 2 * * 1 * * *D．* * * * * *
有如下程序： Private Sub Command1_Click( ) a$="A WORKER IS OVER THERE" x=Len(a ＄) For i=1 To x-1 b$=Mid $(a $，i，2) If b $="ER"Then s=s+1 Next i Pdnt s End Sub 程序运行后的输出结果是A．1B．2C．3D．4
下面程序运行后的输出结果是 Private Sub Command1_Click() For j=1 To 10 If j Mod 3＜＞0 Then a=a+j\3 Next Print a End SubA．20B．10C．3D．9
下列程序运行后的输出结果是______。Private Sub f(k，s)s=1For j=1 To ks=s*jNextEnd SubPrivate Sub Command1_Click()Sum=0For i=1 To 3Call f(i，s)Sum=Sum+sNextPrint SumEnd Sub