假定有如下的Sub过程：Sub S（x As Single，y As Single) t=x x=t/y y=t Mod yEnd Sub在窗体上画一

假定有如下的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

假定有如下的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=2 S a,b print a,b End Sub 程序运行后，单击命令按钮，输出结果是()。

A．5 2

B．1 1

C．1.25 4

D．2.5 1

假定有如下的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．54

B．] 1]]1

C．] 1.2]]5.4

D．] 1.25]]1

假定有如下的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．

B．

C．

D．

假定有如下的Sub过程：Sub Sub1 (x As Single, y As Single) t=x x = t/y y = t Mod yEnd 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．5 4

B．1 1

C．1.2 5.4

D．1.25 1

假定有如下的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 sfun(x As Single,y As SinglE)t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() Dim a as single Dim b as single a=5 b=4 sfun a,b MsgBox a &char(10

A．1和1

B． 1.25和1

C． 1.25和4

D． 5和4

假定有如下的Sub过程： sub sfun(x As Single,y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() Dim a as single Dim b as single a=5 b=4 sfun a,b MsgBox a & chr(10)+chr(13)& b End Sub 打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为 ______。

A．1和1

B．1.25和1

C．1.25和4

D．5和4

假定有如下事件过程： 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 4

B．56 3

C．28 1

D．243 5

假定有如下事件过程： 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 4

B．56 3

C．28 1

D．243 5