下面是程序是计算给定函数的值,自变量x,y的值用InputBox函数输入,函数如下:   程序不完整,请填空,将程序的补充完整   Option Explicit   Dim x As Single   Dim y As Single   Dim z A

admin2009-01-15  33

问题 下面是程序是计算给定函数的值,自变量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

选项

答案答案

解析 本题用了块IF结构根据题目给出的程序可知【  】、【  】是填条件语句的,根据Then后面的内容可以确定:【  】应填入x>0 And y>0;【  】应填入x<0 And y>0;函数除了满足上述条件的都是“其他”,所以【  】应为Else。s
转载请注明原文地址:https://kaotiyun.com/show/DS2p777K
0

最新回复(0)