VB2008入门教程：[9]

1、这个比较简单。即：

For......

Next

1、在“文件”菜单上，选择“新建项目”。

在“新建项目”对话框的“模板”窗格中，单击“Windows 应用程序”。

在“名称”框中键入 ForNext，然后单击“确定”。

2、将一个“文本框”控件和一个“按钮”控件从“工具箱”中拖动到窗体上。

3、双击“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

4、按 F5 运行程序。

在文本框中，键入一个数字，然后单击按钮。

一个消息框将按您在文本框中指定的次数出现。