select case语句的问题

弱弱的问下各位大侠 下面这个 select case 语句怎么改成可运行的select case语句 
Select Case y, x
  Case x > 0 And y > 0
  Print “点在第一象限”
  Case x < 0 And y > 0
  Print “点在第二象限”
  Case x < 0 And y < 0
  Print “点在第三象限”
  Case x > 0 And y < 0
  Print “点在第四象限”
End Select 

if x > 0 then
  if y > 0 then Print “点在第一象限”
  if y < 0 then Print “点在第四象限”
end if
if x < 0 then
  if y > 0 then Print “点在第二象限”
  if y < 0 then Print “点在第三象限”
end if 


这不是更清晰么