分支语句——Select Case语句
SelectCase <表达式>
Case <值1>
<语句块A>
Case <值2>
<语句块B>
…………………………
Case Else
<语句块N>
End Select