[单选题]

下列程序运行后在立即窗口输出结果是( )。 Private Sub Form_Click() x="a":y="b" z=1:u=2 Debug. Print x; y, z; u Debug. Print z; x, y; u End Sub

A.a b 1 2 1 ab 2

B.a b 1 2 1 a b 2

C.a b 1 2 1 a b 2

D.a b 1 2 1 a b 2

参考答案与解析:

相关试题

下列程序运行后在立即窗口输出的结果是()。Private Sub Form_Cl

[单选题]下列程序运行后在立即窗口输出的结果是( )。Private Sub Form_Click()x="a":y="b"z=1:u=2D.ebug.Printx;y,z;uD.ebug.Printz;x,y;uE.nd SubA.a b 1 2 1 ab 2B.a b 1 2 1 a b 2C.a b 1 2 1 a b 2D.)a b 1 2 1 a b 2

  • 查看答案
  • 下列程序运行后立即窗口输出的结果是Private Sub Form_ClickO

    [单选题]下列程序运行后立即窗口输出的结果是 Private Sub Form_ClickO X="a":y="b" Z=1:u=2 Debug.x;y,z;u Debug.z;x,y;u End Sub A.a b 12 1 ab 2 B.ab 121 a b2C.ab 12 1a b2 D.ab 121a b2

  • 查看答案
  • 以下程序运行后的输出结果是______。Private Sub Form_ Cl

    [单选题]以下程序运行后的输出结果是______。 Private Sub Form_ Click() y=1 :x=2 Print Iif(x>=y,x,y) End SubA.0B.1C.2D.3

  • 查看答案
  • 执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Cl

    [单选题]执行下列程序后,鼠标单击窗体,输出结果为Private Sub Form_Click()Print "Click";E.nd SubPrivate Sub Form_mouseDown(Button As Integer,ShiftA.s Integer, X As Single, Y As Single)Print "Donw"E.nd SubPrivate Sub Form_MouseUp(ButtonAsInteger,ShiftA.s Integer, X As Single,

  • 查看答案
  • 以下程序运行后输出的结果是______。Private Sub Form. _C

    [单选题]以下程序运行后输出的结果是______。 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_C

    [单选题]运行下列程序,单击窗体后输出的结果是( )。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()

    [单选题]下列程序运行时输出的结果是( )。 Private Sub Form_Click() Dima a=Array("天天向上","清华大学","天上人间","程序设计") forI=Lbound(a,1) to Ubound(a,1) ifleft(a(i),1)="天"then print a(i); nextI End SubA.天天向上B.天天向上天上人间C.出错信息D.天天向上清华大学天上人间程序设计

  • 查看答案
  • 试题35运行下列程序,在立即窗口显示的结果是()Private Sub Comm

    [单选题]试题35运行下列程序,在立即窗口显示的结果是()Private Sub Command0_Click()D.im I As Single , J As SingleF.or I= 2 To 10F.or J = 2 To I/2If I mod J = 0 Then Exit ForNext JIf J > sqr (I) Then Debug .Print I;Next IE.nd SubA.1 5 7 9B.4 6 8C.3 5 7 9D.2 3 5 7

  • 查看答案
  • 下列程序运行时输出的结果是 Private Sub Form_Click()Di

    [单选题]下列程序运行时输出的结果是Private Sub Form_Click()D.im xx=Array("天天向上","清华大学","天上人间","程序设计")F.or i=LBound(a,1) to UBound(a,1)If Left(a(i),1)="天"Then Print a(i);NextE.nd SubA.天天向上B.天天向上天上人间C.出错信息D.天天向上清华大学天上人间程序设计

  • 查看答案
  • 下列程序运行时输出的结果是Private Sub Form_Click()Dim

    [单选题]下列程序运行时输出的结果是 Private Sub Form_Click() Dim x x=Array(“天天向上”,“清华大学”,“天上人间”,“程序设计”) For i=LBound(a,1)to UBound(a,1) If Left(a(i),1)=“天”Then Print a(i); Next End SubA.天天向上B.天天向上天上人间C.出错信息D.天天向上清华大学天上人间程序设计

  • 查看答案
  • 下列程序运行后在立即窗口输出结果是( )。Private Sub Form_Cl