会员登录 - 用户注册 - 网站地图 Office中国(office-cn.net),专业Office论坛
当前位置:主页 > 技巧 > Access技巧 > 模块函数VBA > 正文

select case后面语句块的值的四种格式

时间:2013-11-04 17:37 来源:office中国 作者:admin 阅读:

(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

(责任编辑:admin)

顶一下
(2)
100%
踩一下
(0)
0%
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价: