admin 管理员组文章数量: 887031
2023年12月17日发(作者：linux系统网站)
vb中case语句用法举例说明
在VB中，`Case`语句用于根据表达式的值选择不同的代码块进行执行。下面是几个使用`Case`语句的示例：
1. 使用常量值：
```vb
Dim dayOfWeek As Integer = 3
Select Case dayOfWeek
Case 1
ine("Sunday")
Case 2
ine("Monday")
Case 3
ine("Tuesday")
Case 4
ine("Wednesday")
Case 5
ine("Thursday")
Case 6
ine("Friday")
Case 7
ine("Saturday")
Case Else
ine("Invalid day of week")
End Select
```
这段代码根据`dayOfWeek`的值选择输出不同的天数名称。
2. 使用表达式：
```vb
Dim age As Integer = 20
Select Case age
Case 0 To 12
ine("Child")
Case 13 To 19
ine("Teenager")
Case 20 To 65
ine("Adult")
Case Else
ine("Senior")
End Select
```
这段代码根据`age`的值选择输出不同的年龄阶段。
3. 使用字符串匹配：
```vb
Dim fruit As String = "apple"
Select Case fruit
Case "apple"
ine("This is an apple")
Case "banana"
ine("This is a banana")
Case "orange"
ine("This is an orange")
Case Else
ine("Unknown fruit")
End Select
```
这段代码根据`fruit`的值选择输出不同的水果信息。
4. 使用布尔值判断：
```vb
Dim isWeekend As Boolean = True
Select Case isWeekend
Case True
ine("Enjoy your weekend!")
Case False
ine("It's a weekday.")
End Select
```
这段代码根据`isWeekend`的值选择输出不同的信息。
版权声明：本文标题：vb中case语句用法举例说明 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.freenas.com.cn/free/1702815603h431955.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论