VB程序设计,从键盘任意输入一个X的值,求以下分段函数的值:（30分）：Y=X+2(X>0) Y=0(X=0) Y=X2 (X_其他解答

VB程序设计,从键盘任意输入一个X的值,求以下分段函数的值:（30分）：Y=X+2(X>0) Y=0(X=0) Y=X2 (X

人气：114 ℃　时间：2020-01-30 14:59:37

解答

private sub command1_click()
input "x=";x
select case x
case is>=0
y=x+2
case 0
y=0
case is=0
y=x+2
elseif x=0
y=0
else
y=x-2
endif
"y=";y
endsub