vba程序设计基础

《vba程序设计基础》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第十章VBA程序设计基础本章要点：熟悉VBA编程环境掌握VBA语法掌握VBA的流程控制结构210.1VBA编程环境认识VBAVisualBasicforApplication与VB开发工具很相似，包括各种主要的语法结构、函数命令等。与VB的主要区别是VBA主要面向Office办公软件开发工具（增强Word、Excel等软件的自动化能力），提供了很多VB中没有的函数和对象，这些对象都是针对Office应用的。宏的每个基本操作在VBA中都有相应的等效语句。310.1VBA编程环境VBA编程环境：VBE窗口410.1VBA编程环境Access2003数据库中包含的程序模

2、块可以分为两种类型：独立程序模块（标准模块）绑定型程序模块（类模块）510.1VBA编程环境绑定性程序模块是指包含在窗体、报表、页等数据库基本对象之中的事件处理过程，这样的程序模块仅在所属对象处于活动状态下有效。也称类模块。作用范围局限在所属的窗体和报表内部，具有局部特性。610.1VBA编程环境绑定模块代码设计步骤：选中控件的对应事件－>选事件过程：710.1VBA编程环境绑定模块代码设计步骤2：选中事件过程后点按钮。810.1VBA编程环境编辑独立的程序模块独立程序模块是指Access2003数据库中的“模块”对象。这些模块对象可以在数据库中被任一个对象所调用

3、。也称为标准模块。一般用于存放公共过程，不如其他任何Access对象相关联。通常为整个应用系统设置全局变量或通用过程，供其他窗体或报表等数据库对象在类模块中使用或调用。标准模块中的公共变量和公共过程具有全局性，其作用范围为整个应用系统。910.1VBA编程环境标准模块的创建步骤：1.选择”模块”对象，点“新建”1010.1VBA编程环境标准模块的创建步骤：2.标准模块界面1110.1VBA编程环境两种模块：1210.1VBA编程环境VBE窗口的组成1310.1VBA编程环境主要按钮介绍：视图切换：从VBE视图切换到Access数据库对象视图。插入模块：用于插入新模

4、块对象，并置新模块对象为操作目标。运行：执行模块程序。中断：中止正在运行的程序，进入设计模式。重新设置：中止程序设计模式：在设计模式和非设计模式之间切换。1410.1VBA编程环境主要按钮的功能：工程资源管理器：选中当前程序模块。1510.1VBA编程环境属性窗口：1610.1VBA编程环境对象浏览器：1710.1VBA编程环境创建模块添加过程1810.2模块基础Sub过程Public

5、PrivateStaticSub子过程(形参)As数据类型子过程语句ExitSubEndSubPublic可以使该过程能被所有模块的所有其他过程调用。Private可以使该过程只能

6、被同一模块的其他过程调用。在一个过程中也可以调用其他子过程或打开窗体等1910.2模块基础子过程的定义：PublicSubccc()DoCmd.OpenForm"Login"EndSub子过程的调用：Call子过程（[实参]）或者子过程([实参])Callccc()Ccc()2010.2模块基础Function函数Public

7、PrivateStaticFunction函数过程名（[形参]）AS数据类型函数过程语句函数过程名＝表达式ExitFunctionEndFunction和Sub过程很类似，但通常都具有返回值。Static定义静态函数，函数中定义的值一直保存

8、。As数据类型，定义函数返回值类型。2110.2模块基础函数定义PrivateFunctionddd(rAsDouble)AsIntegerDimpiAsDoublepi=3.1415926ddd=pi*r*rEndFunction2210.2模块基础窗体按钮事件中调用模块过程或函数：用表达式生成器选择2310.2模块基础表达式生成器选择标准模块函数方法：2410.3VBA面向对象编程基础属性与方法的引用方式：对象.属性名，对象.方法名这里的对象一般采用：父对象类名！子对象名对于窗体上的控件可以用：me.xx方式来引用，me代表当前窗体。例如访问窗体上标签：For

9、m_模块应用！Lb1.Caption＝“你好啊”Me.lb1.caption＝“你好啊”标准模块只能用：父对象类名！子对象名，而窗体模块两种形式都可以使用，推荐使用me.形式。2510.3VBA面向对象编程基础访问窗体文本框：访问或设置文本框中的字符串读：＝msgbox（me.text1.value）赋值：me.Text1.value＝“你好啊”设置或者访问文本框被选中内容Me.text3.setfocusMe.Text3.SelStart=2Me.Text3.SelLength=2MsgBox(Me.Text3.SelText)2610.3VBA面向对象编程基础

10、设置文本框