VB中如何使用select case语句

最新推荐文章于 2025-04-02 13:02:45 发布

曼舞精灵

最新推荐文章于 2025-04-02 13:02:45 发布

阅读量8.8k

点赞数 1

分类专栏：语言了解

本文链接：https://blog.csdn.net/qq_39800695/article/details/103833032

版权

语言了解专栏收录该内容

10 篇文章

订阅专栏

本文介绍了VB中的Select Case语句，作为条件选择的一种方式，它不同于循环语句。文章详细解析了Select Case的语法，并强调了其与IF...ELSEIF...ELSEIF...END IF语句的相似性。此外，还提到了Case关键字的使用，包括IS和TO，以及如何处理多个情况。特别指出，当所有情况都不匹配时，如果没有Case Else，执行会直接到达End Select。同时，文章提醒读者在使用Select Case时，逻辑运算在非布尔类型的变量中可能无效，并建议在需要提前结束语句时使用Exit Select。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

近来，在网上找了一些关于VB选择语句的代码样例讲解，不过可惜关于Select case的讲解甚少（可能是查找方向有误），遂，作此，如有不足还望评论去添补

语法

Select Case <指示变量或表达式>

Select Case不是循环语句，是条件选择语句，与IF...ELSEIF...ELSEIF...END IF类似

<默认语句组，以上语句组都因情形不符合实际时执行>End Select其中，表述情形的关键字，有IS和TO，多个情形要并列在一起时，使用逗号(英文)连接。当省略Case Else语句并且语句组都因情形不符合实际时，语句的执行，会直接到达End Select。如果在执行语句的时候，有需要跳过没有必要再执行的语句而直接结束Select Case的情况时，请使用exit select

Option explicit
dim digital,hours,minutes,seconds,dn,ctime

digital = time
hours    =  Hour(digital)
minutes  =  Minute(digital)
seconds  =  second(digital)

Select Case True
Case hours<6
dn= "it is time to dream!"
Case hours>=6
dn= "get up and say good morning!"
Case hours>12 & hours<14
dn= "let's have a rest!"
Case else
	dn="I don't know what to do!"
End Select
msgbox dn

注意在“<指示变量或表达式>”不是True或False关键字时，逻辑运算（And、Or、Not）会没有意义。因为逻辑运算的结果是True或False，不是表述具体情况的值或者范围。