运行下列程序 单击Command1命令按钮后 则在窗体上显示第一行和第二行的结果分别是【 】和【 】
运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是【 】和【 】。 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
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:42
表达式“t>0Ort=xAndx<>yOry>z”的计算结果为True,执行fun1(1,4)子函数返回的结果为4。变量x和y的值保留原先值2和3。最后在窗体上显示的第1行和第2行的内容是4和2。
相似问题
为了在运行时将“d:/pic”文件夹下的图形文件“a.jpg”装入图片框Picture1 所使用的语
为了在运行时将“d: pic”文件夹下的图形文件“a jpg”装入图片框Picture1,所使用的语句为【 】。请帮忙给出正确答案和分析,谢谢!
以下程序的功能是在程序运行后 单击命令按钮 输出如下结果: 1 4 7 2 5 8 3 6 9 请完
以下程序的功能是在程序运行后,单击命令按钮,输出如下结果: 1 4 7 2 5 8 3 6 9 请完善以下程序。 Private Sub Command1_Click() Dim A
在窗体上画一个列表框 一个命令按钮和一个标签。程序运行后 在列表框中选择一个项目 然后单击命令按钮
在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表
下述语句段在运行时的显示结果是【 】。 Cls x=34 + 8 Print Len(x)请帮忙给出
下述语句段在运行时的显示结果是【 】。 Cls x=34 + 8 Print Len(x)请帮忙给出正确答案和分析,谢谢!
运行下列程序: Dim t As Integer Private Sub Form_Click()
运行下列程序: Dim t As Integer Private Sub Form_Click() t = 2 x=Val(InputBox("输入一个整数5")) Print funl(x); t End Sub Priva
