Question

VB代码怎么写?

有一个分段函数为请按照下列界面编写程序实现对f(x)的计算。

Answer 1

额……仅供参考，没装VB，直接在这里打了：
function F(byval x as double) as double
if x<=-2 then
F=x*x
else
if x>-2 and x<=2 then
F=abs(x)
else
if x>2 and x<=8 then
F=x+1 '图中的符号看不清，好像是+号，如果错了自己修改下吧
else
F=0-x
end if
end if
end if
end function

Answer 2

Function F(X As Double) As Double
If X <= -2 Then
F = X * X
ElseIf X <= 2 Then
F = Abs(X)
ElseIf X <= 8 Then
F = X + 1
Else
F = -X
End If
End Function

Answer 3

Function Fx(x as double) as double
dim y as double
select case x
case is<=-2
y=x*x
case is<=2
y=abs(x)
case is<=8
y=x+1
case else
y=-x
end select
Fx=y
End Function