更多"假定有如下的Sub过程: sub sfun(x As Single,y"的相关试题:
[单项选择]假定有如下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 sfun(x As Single, y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体中添加个命令按钮command33,对应的事件过程如下:
Private Sub Command33_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 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 sfml(x As Single,y As Single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Commandd1_Click( )
Dim a as single,b as single
a=5:h=4
sflln a,b
MsgBox a & chr10.+chr13.& b
End Sub
打开窗体运行后,单击命令按钮,消息框的两行输出内容分别为
A. 1和1
B. 1.25和1
C. 1.25和4
D. 5和4
[单项选择]假定有如下的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
[单项选择]假定有如下事件过程:
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表示按下的是鼠标左键
[单项选择]假定有如下的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 Commandl_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 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$=“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