[单选题]

设有如下窗体单击事件过程: Private Sub Form_Click() a=1 For i=1 To 3 Select Case i Case 1 a=a+1 Case 2, 4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后,单击窗体,则消息框的输出结果是( )。

A.3

B.4

C.5

D.6

参考答案与解析:

相关试题

设有如下窗体单击事件过程: Private Sub Form_Click() a

[单选题]设有如下窗体单击事件过程: Private Sub Form_Click() a=1 For i=1 To 3 Select Case i Case 1,3 a=a+l Case2,4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后,单击窗体,则消息框的输出结果是______。A.3B.4C.5D.6

  • 查看答案
  • 设有以下窗体单击事件过程: Private Sub Form_Click() a

    [试题]设有以下窗体单击事件过程:Private Sub Form_Click()a=1F.or i=1 To 3E.nd SelectNext iE.nd Sub打开窗体运行后,单击窗体,则消息框的输出内容是( )。

  • 查看答案
  • 假定有如下的窗体事件过程: Private Sub Form_Click() a

    [单选题]假定有如下的窗体事件过程:Private Sub Form_Click()a$="MicrosoftVisual Basic"b$=Right(a$,5)c$=Mid(a$,1,9)MsgBox a$,34,b$,c$,5E.nd Sub程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是A.Microsoft VisualB.MicrosoftC.BasicD.5

  • 查看答案
  • 假定有如下的窗体事件过程:Private Sub Form_Click()a$=

    [单选题]假定有如下的窗体事件过程: Private Sub Form_Click() a$="Microsoft Visual Basic" b$=Right(a$,5) c$=Mid(a$,1,9) MsgBoxa$,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是( )。A.Microsoft VisualB.MicrosoftC.BasicD.5

  • 查看答案
  • 假定有如下的窗体事件过程:Private Sub Form_Click() a$

    [单选题]假定有如下的窗体事件过程: Private Sub Form_Click() a$="MicrosoftVisual Basic" b$=Right(a$,5) c$=Mid(a$,1,9) MsgBox a$,34,b$,c$,5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是A.Microsoft VisualB.MicrosoftC.BasicD.5

  • 查看答案
  • 若有以下窗体单击事件过程:Private Sub Form_Click()res

    [单选题]若有以下窗体单击事件过程:Private Sub Form_Click()result=1F.or i=1 To 6 step 3result=result*iNext iMsgBox resultE.nd Sub打开窗体运行后,单击窗体,则消息框的输出内容是A.1B.4C.15D.120

  • 查看答案
  • 设有如下窗体单击事件过程: Private Sub Fom_Click. a =

    [单选题]设有如下窗体单击事件过程: Private Sub Fom_Click. a =1 For i –To3 Select Case i Case 1,3 a =a +1 Case2,4 a =a +2 End Select Next i MsgBox a End Sub 打开窗体运行后,单击窗体,则消息框的输出的结果是 A.3 B.4 C.5 D.6

  • 查看答案
  • 设有如下程序:Private Sub Form_Click()A=1For i=

    [单选题]设有如下程序: 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.6B.5C.4D.3

  • 查看答案
  • 设有如下程序:Private Sub Form_Click()Dim ary(1

    [单选题]设有如下程序: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

  • 查看答案
  • ( 32 )设有如下窗体单击事件过程:Private Sub Form. Cli

    [单选题]( 32 )设有如下窗体单击事件过程:Private Sub Form. Click ()a = 1F.or i = 1 To 3Select Case iC.ase 1 , 3a = a + 1C.ase 2, 4a = a + 2E.nd SelectNext iMsgBox aE.nd Sub打开窗体运行后,单击窗体,则消息框的输出的结果是A. ) 3B. ) 4C. ) 5D. ) 6

  • 查看答案
  • 设有如下窗体单击事件过程:Private Sub Form_Click()a=1