问题 填空题

运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是 【14】 【15】
Private Sub Command1_Click()
t=1:x=2:y=3:z=4
If t>0 Or t=x And x <> y Or y>z Then
t=fun1(t,z)
Print t
Else
t = fun1(x, y)
Print t
End If
Print x
Print y
End Sub
Function funl(ByVal x As Integer, ByVal y As Integer)As Integer
Do While y <> 0
t=x\y
x=y
y = t
Loop
fun1 = x
End Function

答案

参考答案:[14]4
[15]2

解析:

[分析]: 表达式“t>0Or t=x And x<>y Or y>z”的计算结果为True,执行fun1(1,4)子函数返回的结果为4。变量x和y的值保留原先值2和3。最后在窗体上显示的第1行和第2行的内容是4和2。

问答题 简答题
问答题 简答题