下面是程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下: 程序不完整,请
下面是程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下:
程序不完整,请填空,将程序的补充完整 Option Explicit Dim x As Single Dim y As Single Dim z As Single Private Sub Command1_Click() x=Val(InputBox("x=") ) y=Val(InputBox("y=") ) Private Sub Command2_Click() If【 】Then z=x ^ 2 + y ^ 2 ElseIf【 】Then z=x ^ 2-2 * y^2 【 】 z=y ^ 2 - 3 * x ^ 2 End If Form1.Print "当x,y 的值为:"; x,y Form1.Print "f(x,y) 的值为:": z End sub