在考生文件夹下有“住宿管理”数据库，其中包含表“宿舍”和表“学生”。这两个表之间存在一对多的关系。对该数据库建立表单文件，文件名为“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”，保存在考生文件夹下，然后运行表单。

你可能感兴趣的试题

1 (1)用SELECT语句查询表“销售记录”中“会员编号”为“000003”的记录。
(2)用INSERT语句为表“销售记录”插入一条记录(“010011”，“00000202”，2，600，01／02／08)。
(3)用DELETE将表“销售记录”中单价在500(含)以下的记录删除。
(4)用UPDATE将“销售记录”表的字段“销售日期”加上7天。
将以上操作使用的SQL语句保存到“result1.txt”中。

查看解析在线模考

2 (1)在考生文件夹下有一个数据库“公司”，其中有数据库表“出勤”。使用报表向导制作一个名为“rpt1”的报表。要求：选择表中的全部字段。报表样式为“账务式”；报表布局：列数为“2”，方向为“横向”；排序字段为“职员编号”(升序)；报表标题为“出勤情况”。
(2)在考生文件夹下对数据库“公司”中的表“职员信息”的结构做如下修改：指定“职员编号”为主索引，索引名和索引表达式均为“职员编号”；指定“姓名”为普通索引，索引名和索引表达式均为“姓名”。设置字段“性别”的默认值为“男”。

查看解析在线模考

3 考生文件夹下存在数据库“公司”，其中包含表“职员信息”和表“部门”，这两个表存在一对多的联系。建立文件名为“bd1”的表单，其中包含两个表格控件。
第一个表格控件用于显示表“部门”的记录，第二个表格控件用于显示与“部门”表当前记录对应的“职员信息”表中的记录。
表单中还包含一个标题为“关闭”的命令按钮，要求单击此按钮退出表单。

查看解析在线模考