应用题

在考生文件夹下,对“职员管理”数据库完成如下综合应用:
建立一个名称为“viewl”的视图,查询每个职员的部门编号、部门名称、职工编号、姓名、性别、年龄和EMAIL。
设计一个名称为“bd2”的表单,表单上设计一个页框,页框有“部门”和“职员”两个选项卡,在表单下方有一个“关闭”命令按钮。要求如下:
①表单的标题名称为“公司人事信息”。
②单击选项卡“职员”,在选项卡“职员”中使用“表格”方式显示“viewl”视图中的记录。
③单击选项卡“部门”,在选项卡“部门”中使用“表格”方式显示“部门”表中的记录。
④单击“关闭”命令按钮,关闭表单。

【正确答案】

【操作步骤】
①选择【文件】→【打开】命令,在“打开”对话框的“文件类型”下拉列表框中选择“数据库”,选择“职员管理.dbc”,单击“确定”按钮,打开数据库设计器。
②选择【文件】→【新建】命令,选择“视图”,单击“新建文件”按钮打开“添加表或视图”对话框,选择“表”单选项,选择数据库“职员管理”,将表“部门”和“员工信息”分别“添加”到视图设计器中,系统会自动选择关联字段“部门编号”为两个表建立内部联系,单击“确定”按钮关闭“连接条件”对话框,然后关闭“添加表或视图”对话框。
③在视图设计器中单击“字段”选项卡,将“可用字段”列表框中的“部门.部门编号”、“部门.部门名称”、“员工信息.职工编号”、“员工信息.姓名”、“员工信息.性别”、“员工信息.年龄”和“员工信息.EMAIL”等字段添加到右边的“选定字段”列表框中。
④在视图设计器中单击“关闭”按钮,将视图文件以“view1”名保存在考生文件夹下。
⑤选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,将Caption属性值修改为“公司人事信息”,单击表单控件工具栏上的“页框”控件图标,为表单添加一个页框PageFrame1,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加一个命令按钮Command1,单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件。
⑥选择页框PageFrame1,在页框属性窗口中修改“PageCount”属性值为“2”,选择页框PageFrame1,单击右键,在弹出的菜单中选择“编辑”,单击“Page1”,在页框属性窗口中修改“Caption”属性值为“部门”;单击“Page2”,在页根属件窗口中修曲“Caption”属件值为“职员”.
⑦选择命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值像改为“关闭”。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
⑧在表单设计器中,用鼠标右键单击表单空白处,在弹出的快捷菜单中选择“数据环境”命令,打开表单的数据环境,选择数据库“职员管理”,将数据表文件“部门”添加到数据环境中;再选定“视图”,将视图“view1”添加到数据环境中。
⑨选择页框PageFrame1,在页框属性窗口中双击“Click Event”打开Click事件过程代码编辑窗口,输入以下代码:

ThisForm.Grid1.ColumnCount=一1

Do CASE

CASE ThisForm.PageFrame1.Activepage=1

ThisForm.Grid1.RecordSoureeType=0

ThisForm.Grid1.RecordSource=〝部门″

CASE ThisForm.PageFrame1.Activepage=2

ThisForm.Grid1.RecordSourceType=1

ThisForm.Gridl.RecordSource=〝view1″

ENDCASE

ThisForm.Grid1.Refresh
⑩选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。

【答案解析】