第9节 VBA数据库编程.ppt

北京中医药大学信息中心 第2章 C#语言基础 第九章 VBA数据库编程 一、打开和关闭操作 二、输入框(InputBox) 三、消息框(MsgBox) 四、VBA编程验证数据 五、计时事件（Timer） 一、打开和关闭操作1.打开窗体操作命令格式为：DoCmd.OpenForm 窗体名[,视图][,筛选名称][,Where条件][,数据模式][,窗口模式]有关参数说明如下：窗体名称：字符串表达式，代表窗体的有效名称。视图：各种视图对应常量如下： 设计视图 acDesign ， 数据表视图 acFormDS， 窗体视图（默认值）acNormal， 打印预览acPreview 二、输入框(InputBox) 格式：InputBox(提示信息[,标题][,字符表达式][,左边距][,上边距]) 说明： （1）用于接收用户从键盘上输入的数据; （2）函数返回值为从键盘上输入的数据，为字符串； （3）“提示信息”是显示在对话中用于提示用户输入的信息； （4）“标题”是对话框标题栏上显示的内容； （5）“字符表达式”是默认输入内容； （6）“左边距”是对话框距屏幕左边的距离； （7）“上边距”是对话框距屏幕上边的距离。 输入框函数 以下程序输入11求y的值： x=inputbox(Enter an integer:) x=Cint(x) ‘Cint转整型 select case x case is =0 y=0 case is =10 y=5+2*x case is =15 y=0 end select 三、消息框(MsgBox) 格式：MsgBox(消息[,样式][,标题]) 说明： （1）该函数用于显示操作提示或反馈消息，以提示用户做出反映； （2） “消息”是显示在对话框中的信息； （3）“样式”决定消息框内的按钮和图标的种类和数目，它是“按钮类型”、“图标类型”、“缺省按钮”３个数值之和。 ① 按钮类型 ② 图标类型 ③ 缺省按钮 （4） “标题”是对话框标题栏上显示的内容； （5）函数返回值 根据用户对出现的对话框的反映动作，函数返回以下不同的值： 第二节　VBA数据库编程 　一、DAO技术 二、ADO技术 三、数据库编程分析 四、数据库数据访问和处理时使用的特殊函数 一、DAO技术 　　　DAO（数据访问对象）是VBA提供的一种数据访问接口，使用它可以灵活地访问数据库并进行各种操作。 　　　１．DAO库的引用 　　　２．DAO模型结构 　　　３．使用方法 １．DAO库的引用 （1）打开VBE窗口； （2）选择“工具”菜单中的“引用”项； （3）在“引用”对话框中选择“Microsoft DAO 3.6 Object Library”并确定。 ２．DAO模型结构（数据访问对象） ２．DAO模型结构 ３．使用方法 （1）创建工作区 （2）打开数据库 （3）选择记录集 （4）浏览记录 （5）操作记录 （6）关闭和回收记录集与数据库 （7）举例 （1）创建工作区 Dim 工作区变量 As Workspace Set 工作区变量=DBEngine.Workspace(序号) 此步可省略，若省略则默认为打开0号工作区。 （2）打开数据库 Dim 数据库变量 As Database Set 数据库变量=工作区变量.OpenDatabase(数据库名) 　　若打开当前数据库，则前两步可用以下语句替代： 　　Set 数据库变量=CurrentDB（） （3）选择记录集 Dim 记录集变量 As RecordSet Set 记录集变量=数据库变量.OpenRecordSet（表名｜查询名｜SQL语句） （4）浏览记录 通过记录集对象的相应属性和方法可实现记录的浏览。 访问字段：Fields（字段名｜字段编号） 注意：第一字段编号为０，以此类推。 记录定位： 前移：MovePrevious　后移：MoveNext 首记录：MoveFirst　尾记录：MoveLast 记录n：Move n 测试状态：文件首：BOF　文件尾：EOF （6）关闭和回收记录集与数据库 关闭：Close 回收：记录集或数据库对象名=Nothing 二、ADO技术 　DAO只能用于本地数据库连接，它没有远程连接能力。 　ADO（活动数据对象）既能实现本地连接，也能实现远程连接，是一种替代DAO的数据库连接新技术。 １．ADO库的引用 （1）打开VBE窗口； （2）选择“工具”菜单中的“引用”项； （3）在“引用”对话框中选择“Microsoft ActiveX Data Objects 2.1 Library”并确定。 ２．ADO模型结构 教学管理数据库年龄字段加1