填空题

有如下SUB过程：
Sub s(x As Single，y As Single)
　t=x
　x=t/y
　y=t Mod y
End Sub
在窗体上添加一个命令按钮，然后编写如下事件过程：
Private Sub Form_Click()
　Dim a As Single
　Dim b As Single
　a=5
　b=4
　s a,b
　Print a,b
End Sub
则程序运行后，单击命令按钮，输出的结果为______。

【参考答案】

A.BE,A
<上一题 目录 下一题>
热门 试题

填空题
下列程序弹出对话框中按钮的个数为______。 MsgBox“确认!”，vbAbortRetryignore+vbMsgBoxHelpButton+vbInformation，“提示；”
填空题
如果存在如下过程： Private Function Fun(a()As Integer) Dim First As Integer，Last As Integer，i As Integer First=LBound(a) Last=LBound(a) Max=a(First) For i=First To Last If a(i)＞Max Then Max=a(i) Next Fun=Max End Function 在窗体上添加一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() ReDim in(1 To 4)As Integer m(1=20:m(2)=30:m(3)+50:m(4)=100 c=Fun(m) Print c End Sub 单击命令按钮，其输出结果为______。
相关试题