设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 45316|回复: 146

[模块/函数] 【新手入门】之一:If分支语句

[复制链接]
发表于 2012-2-13 00:48:41 | 显示全部楼层 |阅读模式
     看了ycxchen在筛选语句问题提及的问题,决定花些时间开始对所有新手进行扫盲,所以这一系列帖子会临时置顶。后面尽可能每周完成一个帖子。
      同样地,因为是扫盲,所以这些可能不值一哂的问题或者答案,高手们路过就好了,不过不介意大家出题接龙。
      好了,废话少说,先抛出今天的题目(大家可以先在模块里进行调试,并想想为什么):
      1、2个y是一样的吗?如果不一样,y都等于多少呢?
      代码1:
  1. Sub test()
  2. Dim x, y
  3. x = 2
  4. If x > 0 Then y = 3 * x
  5. y = 2 * x + 1
  6. Debug.Print y
  7. End Sub
复制代码
代码2:
  1. Sub test()
  2. Dim x, y
  3. x = 2
  4. y = 2 * x + 1
  5. If x > 0 Then y = 3 * x
  6. Debug.Print y
  7. End Sub
复制代码
2、立即窗体里打印出来的x和y哪个大?
  1. Sub test()
  2. Dim x, y, t
  3. x = 7
  4. y = 2
  5. If x > y Then t = x: x = y: y = t
  6. Debug.Print x, y
  7. End Sub
复制代码
游客,如果您要查看本帖隐藏内容请回复

【新手入门】之一:If分支语句
【新手入门】之二:分支语句总结
【新手入门】之三:循环语句For
【新手入门】之四:循环语句Do和死循环
【新手入门】之五:公共变量与传址过程、传值过程
【新手入门】之六:“悲欢离合总无情”——浅谈Split和Join
【新手入门】之七:嵌套与并列——再谈If流程问题
【新手入门】之八:“连就连”——浅谈“&”和“+”连接符的区别

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

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

评分

参与人数 1经验 +10 收起 理由
renyucai1963 + 10 很给力! 坚持到底。

查看全部评分

本帖被以下淘专辑推荐:

发表于 2012-2-13 06:46:17 | 显示全部楼层
怎么都没有end if这样编译应该不能成功.

点评

可以单行写的。有end if是另一种写法  发表于 2015-10-21 16:40
发表于 2012-2-13 08:24:03 | 显示全部楼层
看看
 楼主| 发表于 2012-2-13 10:11:49 | 显示全部楼层
JosephTan 发表于 2012-2-13 06:46
怎么都没有end if这样编译应该不能成功.

单句是不用End If的。
发表于 2012-2-13 11:37:37 | 显示全部楼层
谢谢帮助!进阶
发表于 2012-2-13 11:43:30 | 显示全部楼层
roych 老师您写的代码,我在哪里能够测试呢?谢谢
 楼主| 发表于 2012-2-13 13:38:34 | 显示全部楼层
本帖最后由 roych 于 2012-2-13 13:40 编辑
yanwei82123300 发表于 2012-2-13 11:43
roych 老师您写的代码,我在哪里能够测试呢?谢谢


新建模块,复制粘贴后即可测试(别忘了打开立即窗口)。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
发表于 2012-2-13 14:09:34 | 显示全部楼层
roych老师请问我打开立即窗体后再按哪一个键去执行呢?谢谢
发表于 2012-2-13 14:12:19 | 显示全部楼层
本帖最后由 yanwei82123300 于 2012-2-13 14:13 编辑

看看图片

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
 楼主| 发表于 2012-2-13 15:15:53 | 显示全部楼层
yanwei82123300 发表于 2012-2-13 14:12
看看图片

执行前先按下Ctrl+G以显示立即窗口。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-3-29 14:55 , Processed in 0.091134 second(s), 39 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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