Private Sub Form_Click（）
a$ = "Microsoft Visual Basic"
b$ = Right（a$, 5）
c$ = Mid（a$, 1, 9）
MsgBox a$, 34, b$, c$, 5
E．nd Sub
程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是（ ）。
A．Microsoft Visual
B．Microsoft
C．Basic
D．5
[单选题]假定有如下事件过程：Private Sub Form_Click（）D．im x As Integer, n As Integerx = 1n = 0D．o While x < 28x = x * 3n = n + 1LoopPrint x, nE．nd Sub程序运行后，单击窗体，输出结果是（ ）。A．81 4B．56 3C．28 1D．243 5
[单选题]假定有如下的窗体事件过程: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$="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$="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
[单选题]在窗体的单击事件中有如下程序:privatesubform_click()forj=1to15a=a+jnextjPrintaendsub程序运行后单击鼠标左键，输出的结果是( )A．1B．15C．90D．120
[单选题]假定有如下的窗体事件过程： 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
[单选题]假定有如下事件过程： Privte 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
[单选题]假定有如下事件过程： 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（）D．im i As Integer, sum As Integersum = 0F．or i = 2 To 10If i Mod 2 <> 0 And i Mod 3 = 0 Thensum = sum + iE．nd IfNext iPrint sumE．nd Sub程序运行后，单击窗体，输出结果为（ ）。A．12B．30C．24D．18
[单选题]假定有如下事件过程： 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