Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

VBA编程-使用 Select Case 语句

时 间:2023-01-12 07:36:45
作 者:福哥(QQ86053924)   ID:1784  城市:成都
摘 要:VBA编程-使用 Select Case 语句。
正 文:

      使用 Select Case 语句作为在 If... 中 使用 ElseIf 的 替代方法。然后... 一个表达式与几个 不同的值 进行比较时,Else 语句。 If...Then...Else 语句可计算每个 ElseIf 语句的不同表达式, Select Case 语句则只在控制结构顶部计算一次表达式。

      在以下示例中, Select Case 语句计算传递给过程的参数。 请注意,每个 Case 语句可以包含多个值、一系列值或值和 比较运算符的组合。 如果 Select Case 语句与任何 Case 语句中的值均不匹配,将运行可选的 Case Else 语句。

VB复制

Function Bonus(performance, salary)

  Select Case performance

    Case 1

      Bonus = salary * 0.1

    Case 2, 3

      Bonus = salary * 0.09

    Case 4 To 6

      Bonus = salary * 0.07

    Case Is > 8

      Bonus = 100

    Case Else

      Bonus = 0

  End Select

End Function



Access软件网QQ交流群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助