用VB 求分段函数
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/11 20:57:14
用VB 求分段函数
用VB 求分段函数
用VB 求分段函数
Private Sub Command1_Click()
x = InputBox("请输入x:")
e = 2.718281828
Select Case x
Case -10 To -1
y = e ^ x + 1
Case 0 To 5
y = Abs(x ^ 2 - 100)
Case 6 To 9
y = 3 * x ^ 3 - 2 * x ^ 2 - x + 1
End Select
Print y
End Sub