题目内容
（请给出正确答案）
假定有如下事件过程： Privte Sub Form_Click0 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 4
B．56 3
C．28 1
D．243 5
如果结果不匹配，请 联系老师 获取答案
更多“假定有如下事件过程：Privte Sub Form_Clic…”相关的问题
假定有如下的窗体事件过程： 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 Visual
B．Microsoft
C．Basic
D．5
假定有如下的窗体事件过程：
Private Sub Form_Click（）
a$ = "Microsoft Visual 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$="Microsoft Visual Basic" b$=Right(a$，5) c$=Mid(a$，1，9) Msg Box aS，34，b$，c$，5 End Sub 程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是
A．Microsoft Visual
B．Microsoft
C．Basic
D．5
假定有如下的Sub过程：
Sub Sub1(x As Single，y As single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_click()
Dim a As Single
Dim b As Single
a=5
b=4
Sub1 a，b
Print a；b
End Sub
程序运行后，单击命令按钮，输出结果为
A．.jpg)
B．.jpg)
C．.jpg)
D．.jpg)
假定有如下的窗体事件过程： 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 Visual
B．Microsoft
C．Basic
D．5
假定有如下的Sub过程： Sub Func(x As Single， y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=6 b=5 Func(a, B) Print a, b End Sub 程序运行后，单击命令按钮，输出结果为 ______。
A．6 5
B．1 1
C．1.2 5
D．1.2 1
假定有如下的Sub过程： Sub S(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a，b Print a，b End Sub 程序运行后，单击命令按钮，输出结果为 ______ 。
A．5 4
B．1 1
C．1.25 4
D．1.25 1
假定有如下事件过程： 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．BuRon=2表示按下的是鼠标左键
假定有如下事件过程： Private Sub Form_MouseDown(Button As Integer，Shift As Integer，_x As_Single，-y AsSingle) If Button=2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是
A．该过程的功能是弹出一个菜单
B．popForm是在菜单编辑器中定义的弹出式菜单的名称
C．参数x、y指明鼠标的当前位置
D．Button=2表示按下的是鼠标左键
假定有如下的Sub过程： Sub S(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a，b Print a，b End Sub程序运行后，单击命令按钮，输出结果为______ 。
A．5 4
B．1 1
C．1.25 4
D．1.25 1
