vb判断语句例子

在Visual Basic（VB）编程语言中，判断语句是控制程序流程的重要结构之一，它允许程序根据不同的条件执行不同的代码分支。VB中主要有两种判断语句：If...Then...Else 和 Select Case。本文将通过一些具体的例子来介绍这两种判断语句的用法。

If...Then...Else 语句

If...Then...Else 语句是最基本的条件判断结构，它允许程序根据条件是否满足来执行不同的代码块。

基本语法：

If condition Then
    ' 条件为真时执行的代码
Else
    ' 条件为假时执行的代码
End If

示例：

假设我们要判断一个变量 age 是否大于18岁，并根据结果输出不同的信息。

Dim age As Integer
age = 20

If age > 18 Then
    MsgBox "您已满18岁，可以注册账号。"
Else
    MsgBox "您未满18岁，无法注册账号。"
End If

在这个例子中，如果变量 age 的值大于18，程序会弹出一个消息框提示用户可以注册账号；否则，会提示用户无法注册账号。

Select Case 语句

Select Case 语句是一种多条件分支结构，它允许程序根据不同的值执行不同的代码块。

基本语法：

Select Case expression
    Case value1
        ' 当expression等于value1时执行的代码
    Case value2
        ' 当expression等于value2时执行的代码
    ' ...
   Case Else
        ' 没有匹配的值时执行的代码
End Select

示例：

假设我们要根据不同的星期几输出不同的问候语。

Dim dayOfWeek As Integer
dayOfWeek = 4 ' 假设今天是星期四

Select Case dayOfWeek
    Case 1
        MsgBox "星期一快乐！"
    Case 2
        MsgBox "星期二快乐！"
    Case 3
        MsgBox "星期三快乐！"
    Case 4
        MsgBox "星期四快乐！"
    Case 5
        MsgBox "星期五快乐！"
    Case 6, 7
        MsgBox "周末愉快！"
    Case Else
        MsgBox "未知的星期！"
End Select

在这个例子中，程序会根据变量 dayOfWeek 的值输出对应的问候语。如果 dayOfWeek 的值是6或7（代表星期六或星期日），程序会输出“周末愉快！”。

嵌套 If 语句

在某些情况下，我们可能需要在 If...Then...Else 语句中嵌套更多的条件判断。

示例：

假设我们要判断一个学生的成绩，并根据成绩给出不同的评语。

Dim score As Integer
score = 85

If score >= 90 Then
    MsgBox "优秀！继续保持！"
    If score = 100 Then
        MsgBox "满分！太棒了！"
    End If
ElseIf score >= 80 Then
    MsgBox "良好，可以做得更好。"
ElseIf score >= 70 Then
    MsgBox "及格，需要努力。"
Else
    MsgBox "不及格，加油！"
End If

在这个例子中，程序首先判断成绩是否在90分以上，如果是，再进一步判断是否满分。接着根据成绩的不同区间给出不同的评语。

结论

VB中的判断语句是程序逻辑控制的核心部分，通过 If...Then...Else 和 Select Case 语句，程序员可以根据不同的条件执行不同的代码分支，从而实现程序的复杂逻辑。合理使用这些判断语句，可以使程序更加灵活和强大。通过不断练习和应用，可以更深入地理解这些语句的用法和优势，从而编写出更加高效和优雅的代码。