level 11
ლ塵塵
楼主
Dim Color, MyVar
Sub ChangeBackground(Color)
MyVar=lcase(Color)
If myvar="red" then
response.bgColor = "red"
elseif myvar= "green" then
response.bgColor = "green"
elseif myvar= "blue" then
response.bgColor = "blue"
Else response.write("选择另一种颜色")
End if
End Sub
color="red"
call changebackground(color)
跪求大神帮忙解决这段代码的错误。。
2016年06月14日 01点06分
1
Sub ChangeBackground(Color)
MyVar=lcase(Color)
If myvar="red" then
response.bgColor = "red"
elseif myvar= "green" then
response.bgColor = "green"
elseif myvar= "blue" then
response.bgColor = "blue"
Else response.write("选择另一种颜色")
End if
End Sub
color="red"
call changebackground(color)
跪求大神帮忙解决这段代码的错误。。
