更新：2007 年 11 月
在本课中，您将学习如何在程序中使用 For...Next 语句重复操作以及如何计算这些操作已执行的次数。
编写程序时，经常需要重复操作。例如，假设您要编写一个在屏幕上显示一系列数字的方法。您希望根据需要多次重复显示数字的那行代码。
For...Next 循环允许指定一个数字，然后按指定的次数重复该循环内包含的代码。下面的示例说明 For...Next 循环在代码中如何出现。
Dim i As Integer = 0
For i = 1 To 10
DisplayNumber(i)
Next
For...Next 循环以“计数器变量”i 开始。该循环使用此变量来计算它已经执行的次数。下一行 (For i = 1 to 10) 告诉程序该循环的重复次数以及 i 将具有的值。
代码进入 For...Next 循环时，它将从包含第一个值（本例中为 1）的 i 开始。然后程序执行 For 行和 Next 行之间的代码行，本例中是用 i 的某个参数（本例中仍为 1）调用 DisplayNumber 方法。
当到达 Next 行时，将 1 添加到 i，然后程序的执行再跳回到 For 行。此重复直到 i 的值大于 For 行中的第二个数字（本例中为 10）时才停止。这时，程序继续执行 Next 行后的任何代码。
试一试！
使用 For...Next 语句
在“文件”菜单上，选择“新建项目”。
在“新建项目”对话框的“模板”窗格中，单击“Windows 应用程序”。
在“名称”框中键入 ForNext，然后单击“确定”。
一个新的 Windows 窗体项目随即打开。
将一个“文本框”控件和一个“按钮”控件从“工具箱”中拖动到窗体上。
双击“Button”以打开代码编辑器。
在 Button1_Click 事件处理程序中，键入以下代码。
Dim i As Integer = 0 Dim NumberOfRepetitions As Integer = CInt(Textbox1.Text) For i = 1 To NumberOfRepetitions MsgBox("This line has been repeated " & i & " times") Next按 F5 运行程序。
在文本框中，键入一个数字，然后单击按钮。
一个消息框将按您在文本框中指定的次数出现。
后续步骤
在本主题中，您学习了如何使用 For...Next 循环按指定次数重复代码。现在，您可以继续本系列的下一课使程序在两种可能性之间选择：If...Then 语句，或者可以在详细了解：使用 Do...While 和 Do...Until 进行循环，直到满足条件为止中浏览另一种循环。