应用题

在考生文件夹下,打开数据库“school”,完成如下综合应用:
设计一个表单名为“bd3”的表单,表单的标题为“学生课程成绩基本信息浏览”。表单上有一个包含3个选项卡的“页框”控件和一个“关闭”按钮。其他功能要求如下:
(1)为表单建立数据环境,向数据环境依次添加“student”表、“score”表和“course"表。
(2)要求表单的高度为“160”,宽度为“330”;
(3)3个选项卡的标签的名称分别为“学生表”、“课程表”和“成绩表”,每个选项卡分别以表格形式浏览“student”表、“course”表和“score”表的信息。选项卡位于表单的左边距为12,顶边距为10,选项卡的高度为200,宽度为360。
(4)单击“关闭”按钮关闭表单。

【正确答案】

【操作步骤】
①选择【文件】→【打开】命令,打开数据库“school”。
②选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“学生课程成绩基本信息浏览”;单击表单控件工具栏上的“页框”控件图标.为表单添加一个页框Page–Frame1;单击表单控件工具栏上的“命令按钮”控件图标,为表单添加一个命令按钮Command1;单击表单控件工具栏上的“表格”控件图标,添加一个表格控件Grid1。
③选择页框PageFrame1,在页框属性窗口中修改“PageCount”属性值为“3”,修改“Left”属性值为“12”,“Top”属性值为“10”,“Height"属性值为“200”,“Width”属性值为“360”;选择页框PageFrame1,单击右键,在弹出的快捷菜单中选择“编辑”,单击“Page1”,在页框属性窗口中修改“Caption”属性值为“学生表”;单击“Page2”,在页框属性窗口中修改“Caption”属性值为“课程表”;单击“Page3”,在页框属性窗口中修改“Caption”属性值为“成绩表”。
④选择表格Grid1,在表格属性窗口中修改“Height”属性值为“160”,修改“width”属性值为“330”。
⑤选择命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“关闭”。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
⑥在表单设计器中,鼠标右键单击表单空白处,选择“数据环境”命令,打开表单的数据环境,选择数据库“school”,将表“student”、“score”和“course”添加到数据环境中。
⑦选择页框PageFrame1,在页框属性窗口中双击“ClickEvent”打开Click事件过程代码编辑窗口,输入以下代码:

ThisForm.Grid1.RecordSource=〝″

ThisForm.Grid1.RecordSourceType=0

DO CASE

CASE ThisForm.PageFrame1.Activepage=1

ThisForm.Grid1.RecordSource=〝student″

CASE ThisForm.PageFramel.Activepage=2

ThisForm.Gridl.RecordSource=〝course″

CASE ThisForm.PageFrame1.Activepage=3

ThisForm.Gridl.RecordSource=〝course″

ENDCASE

ThisForm.Grid1.Refresh

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

【答案解析】