(10) 下面的程序是計算給定函數的值，自變量x，y的值用InputBox函數輸入，函數如下：

　　f(x,y) =

　　程序不完整，請填空，將程序的補充完整。

　　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=") )

　　End Sub

　　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

　　正確答案: 1.(x > 0 And y > 0) 2.(x < 0 And y > 0) 3.(Else)