设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 29499|回复: 96

[模块/函数] 【新手入门】之三:循环语句For

[复制链接]
发表于 2012-3-4 14:56:37 | 显示全部楼层 |阅读模式
       按计划应该是上周完成的,由于临时有事,只好推到现在才开始讲循环语句了。
    For语句语法:
       For 变量=初始值 To 终止值 [Step 步长值]
             执行语句
            [Exit For]
    Next [变量]
       步长值默认为1,怎么理解步长值呢?先举个例子:求1-100的奇数和。
    怎么求奇数呢?根据奇数的定义,如果一个数除以2余1的都是奇数,而在VB中有个简单的数学运算符,就是Mod取模。综上,得到第一段代码:
  1. Sub test1()
  2. Dim i As Long
  3. For i = 1 To 100
  4.     If i Mod 2 = 1 Then
  5.     j = j + i
  6.     End If
  7. Next
  8. Debug.Print j
  9. End Sub
复制代码
有没有更简单点的?当然有了。由上面知道,我们只需要让变量i每次向前跳过一个数就好了,怎么跳呢?答案很简单:i=i+1
游客,如果您要查看本帖隐藏内容请回复
      第一次运行时,初始值i=1,j=1,接着i赋值为i+1(即2),然后开始执行i=2的语句(实际上这时候i=2+1=3了),因此得到第二个j=1(i=1时)+3(i=2+1时)=4,如此类推……当然,更直接的办法是,在j=j+1前面加上Debug.Print i,你将清楚地了解i的来龙去脉。
   这个i=i+1不好理解,能不能更直接点?能!那就是现在要讲的Step了:
游客,如果您要查看本帖隐藏内容请回复
这Step可是个“跨栏”高手,跨过这50个“障碍物”可比刘翔还要快的噢。也许这时候有人不以为然了,它能倒着“跨栏”吗?事实上,倒着并不难,只需要把“障碍物”倒着放就好了:
游客,如果您要查看本帖隐藏内容请回复

       如果你足够细心的话,这时候你会发现,咦,怎么不再是100开头的呢?答案是:99才是第一个“障碍物”。以代码test3为例,再问一个问题,如果Step为0或者大于等于100会怎么样?——如果为0将不执行代码(这可不是“原地踏步”嘛),如果大于等于100则只执行1次(因为下一步已经跳到100或100以上了,所以不再执行)。Step就讲到这里。
    下面再简单讲讲For的另一个形式:
    For Each 元素 In 集合
        执行语句
        [Exit For]
    Next [元素]
例如,如果你想把在深圳的Roy找出来,但你又不知道Roy住在哪街哪巷,也不知道深圳有多少人口的话,那么你只需要执行一下这段代码,Roy马上就出来了:
  1. For Each 男生 In 深圳
  2.    If 男生.Name="Roych" Then
  3.         Msgbox "Roy,你妈喊你回家吃饭"
  4.      End If
  5. Next 男生
复制代码
{:soso_e112:}
【新手入门】之一:If分支语句
【新手入门】之二:分支语句总结
【新手入门】之三:循环语句For
【新手入门】之四:循环语句Do和死循环
【新手入门】之五:公共变量与传址过程、传值过程
【新手入门】之六:“悲欢离合总无情”——浅谈Split和Join
【新手入门】之七:嵌套与并列——再谈If流程问题
【新手入门】之八:“连就连”——浅谈“&”和“+”连接符的区别

【新手入门】之九:从百钱百鸡谈起——浅谈“规划求解”兼答lingjiang问
【新手入门】之十:书到用时方恨少——自定义菜单(Access 2003)的制作
【新手入门】之十一:浅谈ADO之序言
【新手入门】之十二:浅谈ADO之Connection
【新手入门】之十三:浅谈ADO之Conmmand(上)
【新手入门】之十四:浅谈ADO之Command(下)
【新手入门】之十五:浅谈ADO之Recordset(上)
【新手入门】之十六:浅谈ADO之Recordset(下)
【新手入门】之十七:浅谈列表框的使用
【新手入门】之十八:双击列表框修改数据
【新手入门】之十九:从“书与女友恕不外借”谈起——浅谈“Bookmark”的使用
【新手入门】之二十:“书与书签”——bookmark属性答疑
【新手入门】之二十一:记录集的“凌迟”——逐条导出记录集

【新手进阶】之一:基础算法(一)
【新手进阶】之二:基础算法(二)
【新手进阶】之三:基础算法(三)
【新手进阶】之四:基础算法(四)
【新手进阶】之五:排序搜索(一)
【新手进阶】之六:排序搜索(二)
【新手进阶】之七:递归算法
【新手进阶】之八:冒泡排序
【新手进阶】之九:浅谈不绑定数据源操作记录
【新手进阶】之十:工作日的计算
【新手进阶】之十一:“庖丁解牛”和“纪昌学射”——浅谈表格式文本数据的导入
【新手进阶】之十二:从四脚腾空的奔马谈起——原来界面可以这样设计
【新手进阶】之十三:Outlook风格导航界面
【新手进阶】之十四:仓库管理系统

本帖被以下淘专辑推荐:

发表于 2012-3-4 15:08:35 | 显示全部楼层
坐下学习
发表于 2012-3-4 15:12:50 | 显示全部楼层
本帖最后由 ycxchen 于 2012-3-4 15:13 编辑

顶,通俗易懂,学习!
发表于 2012-3-5 08:38:57 | 显示全部楼层
谢谢分享
发表于 2012-3-5 08:56:12 | 显示全部楼层
看看,学学
发表于 2012-3-5 12:46:31 | 显示全部楼层
{:soso_e163:}
发表于 2012-3-5 16:59:02 | 显示全部楼层
学习。。。。。
发表于 2012-3-5 17:12:24 | 显示全部楼层
学习
发表于 2012-4-1 22:51:44 | 显示全部楼层
{:soso_e179:}
发表于 2012-4-2 00:06:34 | 显示全部楼层
不错不错
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-3-29 02:35 , Processed in 0.145100 second(s), 36 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表