VB Select Case 条件判断执行语句，VB Select Case 条件执行语句，VB Select Case 判断执行语句，VB Select Case 条件判断语句，VB Select Case 条件语句，VB Select Case 判断语句，VB Select Case 语句，VB Select Case，VB Select，VB Case。

VB Select Case 条件判断执行语句：

Select Case X
    Case Is <= 10
        '当X小于等于10时，执行的代码
    Case Is >= 100
        '当X大于等于100时，执行的代码
    Case Else
        '未达到以上条件，执行的代码
End Select

实例：

Dim X  As Long
X = 50
Select Case X
    Case X <= 10
        MsgBox "X小于等于10", vbInformation, "提示"
    Case X >= 100
        MsgBox "当X大于等于100", vbInformation, "提示"
    Case Else
        MsgBox "X大于10小于100(10<X<100)", vbInformation, "提示"
End Select