输入x,计算y的值。 Private Sub Form_Click() x = Val(InputBox("X=")) If x > = 0 Then y = 1 +3 * x Else y = Sin(2 * x -3)/5 End If Print yEnd Sub
输入x,计算y的值 Private Sub Form_Click() x = Val(InputBox("X=")) If x >= 0 Then y = (1 + 4 * x) / 5 else y = Sin(2*x- 3) / 7 End If Print yEnd Sub