工具搜索引擎 加入收藏
意见反馈
帮助中心
繁體中文
首页 工具超市 产品信息 资讯中心 工具黄页 站长工具 实用工具 会员管理 联系我们  
广告投放
您当前的位置:工具网站长书库> vb2005教程

For...Next 循环语句

在编程时,我们有时候需要多次执行同样的任务,比如读取一个文件夹里的每个文件,读取一个表里的每条记录等。这时候,我们就需要用到循环 (Loop) 语句。

For...Next 循环语句

我们从最容易理解的 For...Next 循环语句说起。For...Next 循环语句基本结构如下:

For...(表达式) = ...(值) To ...(值)
...(执行代码)
Next

意思是,当某个表达式在两个值之间时 (大于等于最小值,小于等于最大值),重复执行一样的代码。

我们这就做个实际的例子。

打开 Visual Studio。在文件 (File) 菜单上,单击新建项目 (New Project)。 在新建项目 (New Project) 对话框的模板 (Templates) 窗格中,单击 Windows 应用程序 (Windows Application)。在名称 (Name) 框中键入 ForNext,再单击确定 (OK)。

选中工具箱 (Toolbox) 里的列表框 (ListBox) 控件,按住鼠标将其拖放到 Form 1 上。然后在属性 (Properties) 窗口内将其 Name 属性改为 lstData。

选中工具箱 (Toolbox) 里的按钮 (Button) 控件,按住鼠标将其拖放到 Form 1 上。然后在属性 (Properties) 窗口内将其 Name 属性改为 btnShow,将其 Text 属性设为 Show。

然后双击该 Button,显示代码编辑器 (Code Editor)。加入代码,使其显示如下:

Private Sub btnShow_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnShow.Click
    Dim intCount As Integer
 
    For intCount = 1 To 10
        lstData.Items.Add("This is item " & intCount)
    Next
 
End Sub

选择调试 (Debug) 菜单中的开始调试 (Start Debugging),运行该程序。或者直接按快捷键 F5 运行。

你会看到 ListBox 里面有如下文字:

This is item 1
This is item 2
This is item 3
This is item 4
This is item 5
This is item 6
This is item 7
This is item 8
This is item 9
This is item 10

你还可以看到,每执行一次 For...Next 当中的代码,就自动递增 1。1 是 For...Next 循环语句的缺省步长 (Step)。

For...Next 循环语句中的步长 (Step)

在缺省情况下,For...Next 语句的递增步长 (Step) 为 1。加上 Step 的 For...Next 语句结构如下:

For...(表达式)  = ...(值) To ...(值) Step ...(值)
...(执行代码)
Next

我们拿刚才的实例修改一下 Step,将 Step 修改成 2,修改代码如下:

For intCount = 1 To 10 Step 2

这表示,每次执行后,intCount 加 2 。我们会看到运行后的结果如下:

This is item 1
This is item 3
This is item 5
This is item 7
This is item 9

反向循环

同样举前面的 ListBox 的例子,假设你想先出现 Item 10,最后出现 Item 1,怎么办呢?

你可以将 Step 值设成负数,将最大值放在前面,最小值放在后面,这样就可以反向循环了。

我们修改代码如下:

Private Sub btnShow_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnShow.Click
    Dim intCount As Integer
 
    For intCount = 10 To 1 Step -1
        lstData.Items.Add("This is item " & intCount)
    Next
 
End Sub

运行程序后,你会发现显示结果是数字从大到小排列了,如下:

This is item 10
This is item 9
This is item 8
This is item 7
This is item 6
This is item 5
This is item 4
This is item 3
This is item 2
This is item 1

提示

当说到循环时,经常用的术语叫迭代 (Iteration),迭代描述了从 For 到 Next 的重复执行过程。

作者:woyouxian[at]gmail[点]com

时间:2006-12-14

返回上级目录
VB 2005 入门教程
安装 VB 2005
一个简单的 VB 2005 程序
什么是编程语言
什么是变量
数据类型概要

数据类型 - 整数和浮点数
数据类型 - 字符串
数据类型 - 日期
过程 - 子例程和函数
If...Then...Else 条件语句
Select...Case 条件语句
For...Next 循环语句

暂无相关评论

发表评论: 用户:
验证码

    
版权所有 中国工具网 电话:0523-86864621