更多"假定有如下的Sub过程： Sub S(x As Single，y A"的相关试题:
[单项选择]假定有如下的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 & chr(10)+chr(13) & b
End Sub 打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为______。
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 &char(10) +char(13) &b
End Sub
打开窗体运行后，单击命令按钮，消息框的两行输出内容分别为______。
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.5和1
C. 1.25和4
D. 5和4
[单项选择]假定有如下的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
[单项选择]假定有如下事件过程：
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
[单项选择]假定有如下事件过程：
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 4
B. 56 3
C. 28 1
D. 243 5
[单项选择]假定有以下两个过程：
Private Sub PPP(aAsSingle，b As Single)
a=a+b
Printa,b
b=a+b
Printa,b
End Sub
Private Sub Form_Activate( )
x=18
Call PPP((x)，(x))
PrintX：
End Sub
则以下说法中不正确的是( )。
A. 虚参是a和b，两个实参(x)和(x)允许重名
B. 虚参是a和b，实参(x)表示传值调用
C. 虚参是a和b，实参(x)表示是非传址调用
D. 虚参是a和b，两个实参(x)和(x)不允许重名
[单项选择]假定有以下两个过程：
Private Sub PPP(a As Single, b As Single)
a=a+b
Print a, b
b=a+b
Print a, b
End Sub
Private Sub Form_Activate0
x=18
Call PPP((x), (x))
Print x
End Sub
则下列说法中不正确的是( )。
A. 形参是a和b，两个实参(x)和(x)允许重名
B. 形参是a和b，实参(x)表示传值调用
C. 形参是a和b，实参(x)表示是非传址调用
D. 形参是a和b，两个实参(x)和(x)不允许重名
[单项选择]假定有下拉两个过程：
Private Sub PPP(a As Single,b As Single)
a=a+b
Print a,b
b=a+b
Print a,b
End Sub
Private Sub Form_Activate（ ）
x=18
Call PPP((x),(x))
Print x
End Sub
则下列说法中不正确的是( )。
A. 形参是a和b，两个实参(x)和(x)允许重名
B. 形参是a和b，实参(x)表示传值调用
C. 形参是a和b，实参(x)表示是非传址调用
D. 形参是a和b，两个实参(x)和(x)不允许重名
[单项选择]假定有下列两个过程：
Private Sub PPP(a As Single, b As Single)
a=a+b
Print a, b
b=a+b
Print a, b
End Sub
Private Sub Form_Activate（ ）
x=18
Call PPP((x), (x))
Print x
End Sub
则下列说法中不正确的是( )。
A. 形参是a和b，两个实参(x)和(x)允许重名
B. 形参是a和b，实参(x)表示传值调用
C. 形参是a和b，实参(x)表示是非传址调用
D. 形参是a和b，两个实参(x)和(x)不允许重名
[单项选择]假定有如下的窗体事件过程：
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 Sun(x As Single, y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上的命令按钮Command1中，编写如下事件过程，执行该事件过程调用Sun过程，结果为( )。
Private Sub Command1_Click（ ）
Dim a As Single
Dim b As Single
a=5
b=4
Sun a, b
Print a; b
End Sub
A. 1.25 1
B. 5 4
C. 4 5
D. 1 1.25
