access8-VBA编程入门语法_第1页
access8-VBA编程入门语法_第2页
access8-VBA编程入门语法_第3页
access8-VBA编程入门语法_第4页
access8-VBA编程入门语法_第5页
已阅读5页,还剩85页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、 Microsoft Accsee插入模块运行子过程/用户窗体设计模式中断重新设计 工程资源管理器 对象浏览器属性窗口工程窗口工程窗口选择对象选择对象属性窗口属性窗口选择对象选择对象的属性的属性代码代码窗口窗口选择选择事件事件 73 x 语句组语句组2语句组语句组1TF语句组语句组2条件条件语句组语句组1FT条件条件语句组语句组TF条件条件语句组语句组TF语句语句2条件条件语句语句1TF条件条件语句语句1Private Sub p1( )Private Sub p1( ) Dim x As Integer, y As Integer Dim x As Integer, y As Integer

2、 x = InputBox(“ x = InputBox(“请输入请输入x x值值”) ) IfIf x = 0 x = 0 ThenThen y = 2 y = 2 * * x + 1 x + 1 ElseElse y = 1 y = 1 MsgBox y: & y MsgBox y: & yEnd SubEnd Subyxxxxxxxsincos231030 T x yT z 为最小数T 使得 x yFFF x yzx y x 与 y 交换y z y 与 z 交换x y x 与 y 交换 If xy Then t=x: x=y: y=t . 例:例:计算累加程序计算累加程序 S=1+2+3+4.+x,S=1+2+3+4.+x,并输出结果。并输出结果。例:计算累乘程序例:计算累乘程序 S=1S=1* *2 2* *3 3* *4X4X 4) 1(3213Int 表 达 式 列 表 1 F T F T E x it D o 语 句 块 语 句 块 E x it D o 语 句 块 语 句 块 表 达 式 列 表 1 图

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论