大神求解决！vb书上说case子句不能出现逻辑等运算符和表达式中的变量，那如何用select ca
答案:1 悬赏:70 手机版
解决时间 2021-02-26 18:33
- 提问者网友：了了无期
- 2021-02-26 00:25
大神求解决！vb书上说case子句不能出现逻辑等运算符和表达式中的变量，那如何用select case表达一个分段函数呢？case中必会出现and or 或变量x的呀？
最佳答案
- 五星知识达人网友：長槍戰八方
- 2021-02-26 01:39
是不能出现逻辑的，我把正确的改了一下！
Private Sub Command1_Click()
Dim x As Integer, y As Double
x = Val(InputBox("enter data x:"))
Select Case x
Case Is > 20
y = x ^ 2 + 3 * x + 2
Case 10 to 20
y = Sqr(3 * x) - 2
Case 0 to 9
y = 1 / x + Abs(x)
End Select
请采纳一下我的答案好吗？谢谢！
Print Format
(y, "#.0000")
End Sub
Private Sub Command1_Click()
Dim x As Integer, y As Double
x = Val(InputBox("enter data x:"))
Select Case x
Case Is > 20
y = x ^ 2 + 3 * x + 2
Case 10 to 20
y = Sqr(3 * x) - 2
Case 0 to 9
y = 1 / x + Abs(x)
End Select
请采纳一下我的答案好吗？谢谢！
Print Format
(y, "#.0000")
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯