使程序在两种可能性之间选择：If...Then 语句

项目
08/18/2008

更新：2007 年 11 月

在这一课中，您将学习使用 If...Then 语句来运行基于条件的代码。

程序需要执行不同的操作以响应不同的条件。例如，您可能希望程序检查当天是星期几，然后根据检查的结果执行不同的操作。If...Then 语句允许您计算一个条件，然后根据此条件的结果运行代码的不同段。

下面的示例演示了 If...Then 语句如何执行。

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Monday Then
  MsgBox("Today is Monday!")
End If

运行此代码时，将计算条件（If 和 Then 之间的部分）。如果此条件为真，将运行下一行代码并显示一个消息框；如果为假，代码将跳到 End If 行。换句话说，此代码描述“如果今天是星期一，则显示消息框”。

试一试！

使用 If...Then 语句

在“文件”菜单上，选择“新建项目”。
在“新建项目”对话框的“模板”窗格中，单击“Windows 应用程序”。
在“名称”框中键入 IfThen，再单击“确定”。

一个新的 Windows 窗体项目随即打开。
双击该窗体以打开代码编辑器。

在 Form1_Load 事件处理程序中，键入以下代码。

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Saturday Or _
  My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Sunday Then
  MsgBox("Happy Weekend!")
End If

按 F5 运行程序。

如果当天是星期六或星期日，则会显示一个消息框，通知您 Happy Weekend!，否则不会显示消息框。
在“调试”菜单上，选择“停止调试”以结束程序。将此项目保持为打开状态。您将在下一个步骤，“使用 Else 子句”中向此项目添加内容。

在上面的示例中您可能已注意到：If...Then 语句使用 Or 运算符计算多个条件（“当天是星期六 Or 当天是星期日”）。在单个 If...Then 语句中，您可以使用 Or 和 And 运算符计算您所需的尽可能多的条件。

Else 子句

您已经看到在条件为真的情况下如何使用 If...Then 语句运行代码，但如果想要在一个条件为真时运行一组代码，而在该条件为假时运行另一组代码，该怎么办呢？在这种情况下，可以使用 Else 子句。Else 子句允许您指定在某条件为假时运行的代码块。下面的示例演示了 Else 子句如何执行。

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Friday Then
  MsgBox("Today is Friday!")
Else
  MsgBox("It isn't Friday yet!")
End If

在此示例中，将计算表达式，如果结果为 true，则执行下一行代码，并显示第一个消息框。如果结果为 false，则代码跳过 Else 子句，而执行 Else 后面的代码行，并显示第二个消息框。

试一试！

此过程从“使用 If...Then 语句”结束的位置开始。如果您尚未完成“使用 If...Then 语句”，则必须先完成这一过程，再继续操作。

使用 Else 子句

将 If...Then 语句中的代码更改为以下代码。

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Saturday Or _
  My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Sunday Then
  MsgBox("Happy Weekend!")
Else
  MsgBox("Happy Weekday! Don't work too hard!")
End If

按 F5 运行程序。现在您的程序会显示一个消息框，以适当的内容描述当天是周末还是工作日。

说明：
如果希望测试这两个代码块的执行情况，可以通过双击 Windows 任务栏上的时间来更改星期数。（任务栏是包含 Windows“开始”按钮的工具栏；默认情况下，它在桌面底部，并在右边的角落显示时间。）