(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)
<< 上一页 [11] [12] [13] [14] [15] [16] [17] [18]