输入

输入x,计算y的值。 

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