Select Case testexpression
[Case expressionlist-n
[statements-n]] ...
[Case Else expressionlist-n
[elsestatements-n]]
End Select
这个答案可以吗?