VBScript 决策

VBScript 是一种基于活动服务器页面（ASP）的编程语言，非常适合用于Web应用程序的开发。VBScript 决策（Decision）包括条件语句和循环语句。

条件语句

条件语句是根据条件执行不同程序的一种语句。VBScript 中的条件语句包括 If 语句和 Select Case 语句。

If 语句

If 语句用于根据条件选择要执行的程序段。

If 条件 Then
    '如果条件为真，则执行该程序段
ElseIf 条件 Then
    '如果第一个条件为假但第二个条件为真，则执行该程序段
Else
    '如果所有条件都为假，则执行该程序段
End If

例如，以下代码将根据不同的成绩输出不同的等级：

Dim score
score = 80
If score >= 90 Then
    Response.Write("优秀")
ElseIf score >= 80 Then
    Response.Write("良好")
ElseIf score >= 60 Then
    Response.Write("及格")
Else
    Response.Write("不及格")
End If

Select Case 语句

Select Case 语句用于根据不同的条件选择要执行的程序。

Select Case 表达式
    Case 值1
        '如果表达式等于值1，则执行该程序段
    Case 值2
        '如果表达式等于值2，则执行该程序段
    Case Else
        '否则，执行该程序段
End Select

例如，以下代码将根据用户输入的数字输出对应的中文：

Dim num
num = InputBox("请输入一个数字：")
Select Case num
    Case 1
        Response.Write("一")
    Case 2
        Response.Write("二")
    Case 3
        Response.Write("三")
    Case Else
        Response.Write("其他")
End Select

循环语句

循环语句是反复执行代码的一种语句，VBScript 中的循环语句包括 For 循环、Do While 循环和 Do Until 循环。

For 循环

For 循环用于指定计数器的初始值、终止值和步长，然后执行一段代码块。

For 计数器 = 初始值 To 终止值 Step 步长
    '执行的代码块
Next

例如，以下代码将输出从 1 到 10 的数字：

For i = 1 To 10
    Response.Write(i & "<br>")
Next

Do While 循环

Do While 循环用于在条件为真时重复执行一段代码块。

Do While 条件
    '执行的代码块
Loop

例如，以下代码将输出从 1 到 10 的数字：

Dim i
i = 1
Do While i <= 10
    Response.Write(i & "<br>")
    i = i + 1
Loop

Do Until 循环

Do Until 循环用于在条件为假时重复执行一段代码块。

Do Until 条件
    '执行的代码块
Loop

例如，以下代码将输出从 1 到 10 的数字：

Dim i
i = 1
Do Until i > 10
    Response.Write(i & "<br>")
    i = i + 1
Loop