admin 管理员组

文章数量: 1184232


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.roclinux.cn/p/1702815603a431955.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。