Select 情况条件选择
根据情况选择条件判断
参数1 条件型,情况

//不支持判断语句 如:Case a>0
UserVar 变量=0 "输入(0~9)数字"
//<>---------------------------------------------以下是选择条件结结构判断
Select Case 变量
Case 0
    Msgbox "你输入的数字为:0" 
Case 1
    Msgbox "你输入的数字为:1" 
Case 2
    Msgbox "你输入的数字为:2" 
Case 3
    Msgbox "你输入的数字为:3" 
Case 4
    Msgbox "你输入的数字为:4" 
Case 5
    Msgbox "你输入的数字为:5" 
Case 6
    Msgbox "你输入的数字为:6" 
Case 7
    Msgbox "你输入的数字为:7" 
Case 8
    Msgbox "你输入的数字为:8" 
Case 9
    Msgbox "你输入的数字为:9" 
Case Else
    Msgbox "你输入的数字不正确,请输入(0~9)数字!"
End Select