![[填空题] 运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是 (14) 和 (15) 。Private Sub Command1_Click() t,第1张 [填空题] 运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是 (14) 和 (15) 。Private Sub Command1_Click() t,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E8%BF%90%E8%A1%8C%E4%B8%8B%E5%88%97%E7%A8%8B%E5%BA%8F%EF%BC%8C%E5%8D%95%E5%87%BBCommand1%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%E5%90%8E%EF%BC%8C%E5%88%99%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E6%98%BE%E7%A4%BA%E7%AC%AC%E4%B8%80%E8%A1%8C%E5%92%8C%E7%AC%AC%E4%BA%8C%E8%A1%8C%E7%9A%84%E7%BB%93%E6%9E%9C%E5%88%86%E5%88%AB%E6%98%AF+%2814%29+%E5%92%8C+%2815%29+%E3%80%82Private+Sub+Command1_Click%28%29%E3%80%80%E3%80%80t.png)
[填空题] 运行下列程序,单击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 fun1(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
正确答案:D
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)