[单选题]

假定有如下的窗体事件过程: 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 Visual

B.Microsoft

C.Basic

D.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$,5E.nd Sub程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是A.Microsoft VisualB.MicrosoftC.BasicD.5

  • 查看答案
  • 假定有如下事件过程:Phvate Sub Form_Click()DimXASI

    [单选题]假定有如下事件过程: Phvate Sub Form_Click() DimXASInteger,nASInteger x=1 n=0 Do While x<28 x=x*3 n=n+1 Loop Ptint x,n End Sub 程序运行后,单击窗体,输出结果为______。A. 81 4B.56 3C.28 1D.243 5

  • 查看答案
  • 假定有如下事件过程:Private Sub Form. Click()Dim x

    [单选题]假定有如下事件过程: Private Sub Form. Click() Dim x As Integer, n As Integer x=1 n=0 Do While x<28 x=x*3 n=n+1 Loop Print x, n End Sub 程序运行后,单击窗体,输出结果是______。A.81 4B.56 3C.28 1D.243 5

  • 查看答案
  • 设有如下窗体单击事件过程: 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 Command1_Click(

    [单选题]假定有如下的窗体事件过程: Private Sub Command1_Click() a$="Microsoft Visual Basic" b$=Riqht(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()a=1

    [单选题]设有如下窗体单击事件过程: 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.3B.4C.5D.6

  • 查看答案
  • 假定有如下事件过程:Private Sub Form_MouseDown(But

    [单选题]假定有如下事件过程: Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button=2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是( )。A.该过程的功能是弹出一个菜单B.PopForm是在菜单编辑器中定义的弹出式菜单的名称C.参数X、Y指明鼠标的当前位置D.Button=2表示按下的是鼠标左键

  • 查看答案
  • 假定有如下事件过程: Private Sub Form_MouseDown(Bu

    [单选题]假定有如下事件过程:Private Sub Form_MouseDown(Button As Integer,Shift As Integer,x As Single)If Button=2 ThenPopupMenu popForm.E.nd IfE.nd Sub则以下描述中错误的是A.该过程的功能是弹出一个菜单B.popForm是在菜单编辑器中定义的弹出式菜单的名称C.参数x、y指明鼠标的当前位置D.Button=2表示按下的是鼠标左键

  • 查看答案
  • 假定有如下事件过程:Private Sub Form_MouseDown(Bua

    [单选题]假定有如下事件过程: Private Sub Form_MouseDown(Buaon As Integer,Shift As Integer,x As Single,y_As Single) If Button=2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是A.该过程的功能是弹出一个菜单B.popForm是在菜单编辑器中定义的弹出式菜单的名称C.参数x、y指明鼠标的当前位置D.Button=2表示按下的是鼠标左键

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