[填空题] 下面是程序是计算给定函数的值，自变量x，y的值用InputBox函数输入，函数如下：　　　　程序不完整，请填空，将程序的补充完整　　Option Explicit　　Dim x As Si

[填空题] 下面是程序是计算给定函数的值，自变量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　【13】　Then　　　　　　z=x ^ 2 + y ^ 2　　　　ElseIf　【14】　Then　　　　　　z=x ^ 2-2 * y^2　　　　　　　【15】　　　　　　　z=y ^ 2 - 3 * x ^ 2　　　　End If　　　　Form1．Print "当x，y 的值为："； x，y　　　　Form1．Print "f(x，y) 的值为:"： z　　End sub