《数据库应用开发--Access实用教程 教学课件 ppt 作者 陈佳玉 第6章电子教案》由会员分享，可在线阅读，更多相关《数据库应用开发--Access实用教程 教学课件 ppt 作者 陈佳玉 第6章电子教案（53页珍藏版）》请在金锄头文库上搜索。
1、,END,第6章 窗体,6.1 窗体的构成与创建 6.2 窗体控件 本章小结 习 题,第6章 窗体,6.1 窗体的构成与创建,END,窗体通常由窗体页眉、页面页眉、主体、页面页脚、 窗体页脚等五部分组成，如图6-1所示。 在具体的应用中，窗体是否都要包括五部分，视实 际需要来确定。有些窗体，可能只包括窗体的主体部分， 如图6-2所示。,第6章 窗体,6.1 窗体的构成与创建,END,图6-1 窗体的构成,第6章 窗体,6.1 窗体的构成与创建,END,图6-2 只包括主体部分的窗体,第6章 窗体,6.1 窗体的构成与创建,END,在Access中，窗体有三种视图分为设计视图、窗 体视图和数据表
2、视图。窗体的设计视图，主要用于创 建、修改、管理窗体。窗体视图是运行中的窗体，可 显示记录数据，也可实现添加或修改表的数据。数据 表视图是以行列的形式显示表、查询或窗体数据的窗 口，是用户维护数据的交互界面。本节将讲述创建窗 体的常用操作技巧。,第6章 窗体,6.1 窗体的构成与创建,END,任务1 用向导创建“基本信息表维护窗体” 1任务要求 掌握使用向导创建窗体的操作方法。,在Access中，窗体有三种视图分为设计视图、窗体 视图和数据表视图。 6.1.1 创建窗体,2操作步骤 （1）在“学生管理”数据库的窗体对象窗口，“使用向导创 建窗体”。 （2）“使用向导创建窗体”选项，打开“窗体向
3、导”，按以下 要求创建窗体。,第6章 窗体,6.1.1 创建窗体,END,1）选取“基本信息表”作为数据来源，并选定所有字段。 2）未提及的内容全部按默认值设置。 3）保存窗体时，命名为“基本信息表维护窗体”。 （3）完成后，运行并调试窗体，观察窗体的运行效果。,任务2 用“自动创建”创建“科目代码表”维护窗体 1任务要求 掌握使用“自动创建”快速创建窗体的操作方法。 2操作步骤 （1）在“学生管理”数据库的窗体对象窗口，单击“新建” 按钮，打开“新建窗体”对话框。 （2）选择“科目代码表”作为数据的来源表。 （3） 选取“自动创建窗体：纵栏式”选项，创建窗体。 （4）保存窗体时，命名为“科目
4、代码维护窗体”，最后 运行并调试窗体。,第6章 窗体,6.1.1 创建窗体,END,任务3 设置“基本信息表维护窗体”的窗体属性 1任务要求 掌握设置窗体属性的操作方法。 2操作步骤 （1）打开“基本信息表维护窗体”的设计视图。 （2）在“窗体”属性窗口中，把“导航按钮”的值选定为“否”。 （3）把“记录选择器”的值更改为“否”。 （4）任务完成，运行窗体，观察运行的效果。 3知识要点 查看窗体其它属性的功能说明： （1）从提示信息中可查看说明。 （2）使用键，查看帮助说明。,第6章 窗体,6.1.2 设置窗体属性,END,控件是一种图形化的对象，是在窗体或报表上用 于显示数据、执行操作或装饰
5、窗体、报表的对象。例 如，可以在窗体或报表上使用文本框显示数据，在窗 体上使用命令按钮打开另一个窗体或报表，或使用线 条、矩形框来分隔与组织控件，美化界面。,第6章 窗体,6.2 窗体的控件,END,Access一般包含以下控件类型：文本框、标签、 选项组、复选框、切换按钮、组合框、列表框、命令按 钮、图像控件、绑定对象框、非绑定对象框、子窗体/子 报表、选项卡控件、分页符、线条、矩形框以及ActiveX 控件，它们可以通过窗体设计视图或报表设计视图中的工 具箱进行访问。,第6章 窗体,6.2 窗体的控件,END,任务4 为“基本信息表维护窗体”添加命令按钮控件 1任务要求 掌握使用向导添加命
6、令钮控件的操作方法。 2操作步骤 （1）打开“基本信息表维护窗体”的设计视图。 （2）使用“命令按钮向导” 的功能，在窗体内添加 “第一条”、前一条、下一条、最末条、撤消、关闭等记录 操作或窗体操作的命令按钮。 （3）各按钮的摆放位置如下图所示。,第6章 窗体,6.2.1 命令按钮,END,第6章 窗体,6.2.1 命令按钮,END,（4）任务完成后，运行并调试窗体。,3知识要点 在命令按钮向导中，所遇到的命令按钮可分为六类： 记录导航、记录操作、窗体操作、报表操作、应用程序、 杂项。 （1）记录导航类别包括的操作项：查找下一项、查找 记录、转至下一项记录、转至前一项记录、转至最后 一项记录、
7、转至第一项记录。,第6章 窗体,6.2.1 命令按钮,END,（2）记录操作类别包括的操作项：保存记录、删除 记录、复制记录、打印记录、撤消记录、添加新记录。,（3）窗体操作类别包括的操作项：关闭窗体、刷新窗 体数据、应用窗体筛选、打印当前窗体、打印窗体、 打开窗体、打开页、编辑窗体筛选。 （4）报表操作类别包括的操作项：将报表发送至文件、 打印报表、邮递报表、预览报表。 （5）应用程序类别包括的操作项：运行MS Excel、运 行 MS Word、运行应用程序、退出应用程序。 （6）杂项类别包括的操作项：打印表、自动拨号程序、 运行宏、运行查询。,第6章 窗体,6.2.1 命令按钮,END,
8、组合框由文本框和列表框组合而成，列表一般由多 行数据组成，用户可从列表框中选择数据也可输入文本， 而且也可以使文本框的数据直接绑定于某字段上。下面 通过1个任务的操作学习建立组合框的方法。,第6章 窗体,6.2.2 组合框控件,END,任务5 向“基本信息表维护窗体”添加组合框控件 1任务要求 掌握添加组合框控件的操作方法。 2操作步骤 （1）打开“基本信息表维护窗体”的视计视图，删除“性 别”文本框。 （2）添加标题为“性别”的组合框，实现“男”或“女”的输 入。 （3）调整组合框控件的位置与大小。 （4）任务完成，运行并调试窗体。,第6章 窗体,6.2.2 组合框控件,END,图像控件主要
9、用于在窗体中显示静态图片，图 片来源于某个文件名，采用一定的代码可实现显示 对应记录的图片数据，具有非常重要的使用价值。 下面通过1个任务的操作学习添加和设置图像控件的 操作技巧。,第6章 窗体,6.2.3 图像控件,END,任务6 在“基本信息表维护窗体”上添加图像控件 1任务要求 掌握图像控件属性设置的方法。 2操作步骤 （1）打开“基本信息表维护窗体”的设计视图。 （2）在窗体中添加一个名称为tx的图像控件。 （3）设置窗体的“成为当前”事件，代码如下：,第6章 窗体,6.2.3 图像控件,END,Private Sub Form_Current() On Error GoTo cl:
10、Dim tp As String tp = CurrentProject.Path & “photo“ & Me.照片 Me.tx.Picture = tp Exit Sub cl: Me.tx.Picture = “ End Sub,第6章 窗体,6.2.3 图像控件,END,（4）任务完成，运行“基本信息表维护窗体”，调试“记录 导航”的功能，观察图片内容的变化。,标签控件一般用于在窗体上显示指定的文字，可 通过标签控件属性的设置，使显示文字美观而且有实 用意义，下面通过1个任务的操作学习设置标签控件 的操作技巧。,第6章 窗体,6.2.4 标签控件,END,任务7 在“基本信息表维护窗体
11、”上添加“标签”控件 1任务要求 掌握“标签”控件的属性设置方法。 2操作步骤 （1）打开“基本信息表维护窗体”的窗体设计视图。 （2）改变窗体内控件的位置，为放置标签控件预留空间。 （3）按以下要求添加一个标签控件： 1）标识为“学生基本信息维护窗体”。 2）字号为16，字体颜色为蓝色，设置加粗格式。 3）设置第四种特殊效果。 （4）任务完成，调试窗体，观察运行的效果。,第6章 窗体,6.2.4 标签控件,END,使用窗体的复制，可以在现存的窗体上，快速建立 新窗体。对话框控件提供了实现打开或保存文件操作的 可能，在设计过程中，适当输入少量的代码，会更随意 地实现完美的功能，下面通过两个任务
12、的操作学习以上 内容的操作技巧。,第6章 窗体,6.2.5 窗体的复制、对话框控件及事件代码编写,END,任务8 窗体的复制 1任务要求 掌握复制窗体的操作方法。 2操作步骤 （1）选取“基本信息表维护窗体”，选择【复制】菜单项。 （2）选择【粘贴】菜单项。 （3）输入“粘贴为”的窗体名称“照片输入”。 （4）任务完成，观察操作的结果。,第6章 窗体,6.2.5 窗体的复制、对话框控件及事件代码编写,END,文本框既能绑定于某个字段，实现对数据库数据 的维护，亦可以由用户输入值作为变量，为查找等操 作提供条件变量。 在一个窗体中调用另一个现存的窗体能更快捷地 实现复杂的功能。 下面通过1个任务
13、的操作学习上述内容的操作技巧。,第6章 窗体,6.2.6 文本框、子窗体等控件的综合应用,END,任务9 实现“照片输入”窗体的功能 1任务要求 掌握实现照片输入功能的操作方法。 2操作步骤 （1）打开“照片输入”窗体的设计视图。 （2）把主题标签内容更改为“学生照片输入”。 （3）添加CommonDialog按钮，按钮名称更改为DG 。 （4）添加标题为“选取照片文件”的命令按钮。,第6章 窗体,6.2.6 文本框、子窗体等控件的综合应用,END,（5）为“选取照片文件”命令按钮设置单击事件，代码如下：,第6章 窗体,6.2.6 文本框、子窗体等控件的综合应用,END,DG.Filter =
14、 “图象文件|*.jpeg;*.bmp;*.jpg“ Dim dqlj As String dqlj = CurrentProject.Path & “photo“ DG.InitDir = dqlj DG.ShowOpen Dim wjm As String wjm = DG.FileName If IsNull(wjm) Then MsgBox “请为该同学选择一个照片文件”, vbInformation, “系统提示”,第6章 窗体,6.2.6 文本框、子窗体等控件的综合应用,Exit Sub End If Dim zp As String Me.照片 = Right(wjm, Len(
15、wjm) - Len(dqlj) - 1) Call xs,END,Private Sub xs() On Error GoTo cl: If IsNull(Me.照片) Then tx.Picture = “ Else Dim dqlj As String dqlj = CurrentProject.Path & “photo“ tx.Picture = dqlj & 照片 End If Exit Sub cl: MsgBox “把照片文件放在指定位置：与项目同位置的子目录photo中“ End Sub,END,（6）在窗体的代码编辑窗口中，定义xs过程的代码如下：,（7）至此，运行并调试窗体。,第6章 窗体,任务10 建立“基本信息查询”窗体 1任务要求 掌握在窗体中调用查询的操作方法。 2操作步骤 （1）首先按以下要求创建查询，命名为“基本信息查询” 。 1）数据源为“基本信息表”，并选定所有字段。 2）标题为“基本信息查询”。 3）“学号”字段的查询条件是： Like (IIf(IsNull(forms!基本信息表查询!txtxh),“*“, forms!基本信息表查询!txtxh)
