对员工管理数据库中的表“员T”和“职称”,建立文件名为“表单l”的表单,标题为“员 工管理”,表单上有一个表格控件和3个命令按钮,标题分别为“按职称查看”“人数统计”和“退出”。当表单运行时: (1)单击“按职称查看”按钮,以“职称代码”排序查询员工表中的记录,结果在表格控件中显示。 (2)单击“人数统计”按钮,查询职工表中今年的各职称的人数,结果中含“职称代码”和“今年人数”两字段,且结果在表格控件中显示。 (3)单击“退出”按钮美闭表单。
第1题:
对员工管理数据库中的表“员工”和“职称”,建立文件名为“表单1”的表单,标题为“员工管理”,表单上有一个表格控件和3个命令按钮,标题分别为“按职称查看”、“人数统计”和“退出”。当表单运行时:
(1)单击“按职称查看”按钮,以“职称代码”排序查询员工表中的记录,结果在表格控件中显示。
(2)单击“人数统计”按钮,查询职工表中今年的各职称的人数,结果中含“职称代码”和“今年人数”两字段,且结果在表格控件中显示。
(3)单击“退出”按钮关闭表单。
第2题:
在“员工信息管理”数据库中建立视图myview,显示字段包括“职工编号”,“姓名”和“职称编号”和“职称名称”等字段内容是职称名称为“副教授”的记录。
(2)建立表单myfm,标题为“视图查看”。在表单上显示上题中建立的视图myview的内容。表单上有一个标题为“关闭”的命令按钮,单击该按钮,退出表单。
第3题:
(1)将数据库“school”的表“course”的结构拷贝到新表“n course”中。
(2)将表“course”中的记录拷贝到表“n_course”中。
(3)对数据库“school”中的表“teacher”使用表单向导建立一个简单的表单,文件名为“teacher”,要求:显示表中的“职工编号”、“姓名”、“性别”和“职称”字段。表单样式为“凹陷式”;按钮类型为“文本按钮”;按“职工编号”升序排序,表单标题为“教师信息浏览”。
(4)把表单“teacher”添加到新建项目“xm”中。
第4题:
对员一I:管理数据库中的表“员工”和“职称”,建立文件名为“表单1”的表单,标题为“员工管理”,表单上有一个表格控件和3个命令按钮.标题分别为“按职称查看”、“人数统计”和“退出”。当表单运行时: (1)单击“按职称查看”按钮,以“职称代码”排序查询员工表中的记录,结果在表格控件中显示。 (2)单击“人数统计”按钮,查询职T表中今年的各职称的人数,结果中含“职称代码”和“今年人数”两字段,且结果在表格控件中显示。 (3)单击“退出”按钮关闭表单。
第5题:
在考生文件夹下有“住宿管理”数据库,其中包含表“宿舍”和表“学生”。这两个表之间存在一对多的关系。对该数据库建立表单文件,文件名为“bd2”,标题为“住宿管理”,完成如下要求:
(1)在表单中包含两个表格控件,第一个用于显示“宿舍”表中的记录,第二个表格用于显示与“宿舍”表中的当前记录对应的学生表中的记录。
(2)在表单中包含一个“关闭”命令按钮,单击该按钮退出表单。
【考点指引】本大题考查的是表单的设计及表格控件的使用,主要注意表格控件数据源的设置。
【操作步骤】
①选择【文件】→【打开】命令,打开数据库“住宿管理”。
②选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“住宿管理”。单击表单控件工具栏上的“命令按钮”控件图标,为表单添加一个命令按钮Command1,单击表单控件工具栏上的“表格”控件图标,再添加两个表格控件“Grid1”和“Grid2”。
③选择命令按钮,在按钮属性窗口中将命令按钮Command1的Name属性值修改为“cmdClose”,将Caption属性值修改为“关闭”,如图71-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
④在表单设计器中,鼠标右键单击表单空白处,在弹出的快捷菜单中选择“数据环境”命令,打开表单的数据环境,选择数据库“住宿管理”,将数据表文件“宿舍”和“学生”添加到数据环境中。
⑤选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“宿舍”,将“RecordSourceType”属性值修改为“0”,将“ReadOnly”属性值修改为
“.T.”;选择表格控件“Grid2”,在表格控件属性窗口中将“RecordSource”属性值修改为“〝〞”,将“RecordSourceType”属性值修改为“1”。
⑥在表单设计器中,选择“Grid1”,在属性窗口中双击“AfterRowColChange Event”,弹出事件过程代码编辑窗口,输入以下代码:
SELECT学生.*INTO CURSOR trap FROM学生,宿舍WHERE学生.宿舍编号=宿舍.宿舍编号AND宿舍.宿舍编号=ThisForm.Grid1.columns(1).Text1.value
ThisForm.Grid2.RecordSourceType=0
ThisForm.Grid2.RecordSource=〝tmp〞
ThisForm.Grid2.Refresh
⑦选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。