

(1)单一数值或一行并列的数值,用来与“表达式”的值相比较。成员间以逗号隔开。 (2)由关键字To分隔开的两个数值或表达式之间的范围。前一个值必须比后一个值要小,否则没有符合条件的情况。字符串的比较是从它们的第一个字符的ASCII码值开始比较的,直到分出大小为止。 (3)关键字Is接关系运算符,如<>、<=、=、>=或>,后面再接变量或精确的值。 (4)关键字Case Else后的表达式,是在前面的Case条件都不满足时执行的。 <表达式列表>与<变量或表达式> 例如: 表达式 "A" 一组枚举表达式(用逗号分隔) 2,4,6,8 表达式1 To 表达式2 60 To 100 Is 关系运算符表达式 Is < 60 请看下面的示例: Private Sub Form_Click() Dim iMonth As Integer ‘定义月份变量 iMonth = 1 ’为变量赋值 Select Case iMonth ' 计算月份 Case Is <= 3 '月份为1、2、3 MsgBox("春天") Case 4 To 6 '月份为4、5、6 MsgBox("夏天") Case 7, 8, 9 '月份为7、8、9 MsgBox("秋天") Case Else '月份为10、11、12 MsgBox("冬天") End Select End Sub