考生文件夹下存在数据库“student”,其中包含表“class”和表“student”,这两个表存在一对多的联系。对数据库建立文件名为“bd1”的表单,其中包含两个表格控件。 第一个表格控件用于显示表“class”的记录,第二个表格控件用于显示与

admin2010-12-13  29

问题 考生文件夹下存在数据库“student”,其中包含表“class”和表“student”,这两个表存在一对多的联系。对数据库建立文件名为“bd1”的表单,其中包含两个表格控件。
    第一个表格控件用于显示表“class”的记录,第二个表格控件用于显示与表“class”当前记录对应的“student”表中的。

选项

答案①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加一个命令按钮Command1,单击表单控件工具栏上的“表格”控件图标,再添加两个表格控件“Grid1”,和“Grid2”。 ②选择命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“关闭”,如图62-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。 [*] ③选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“class”,将“RecordSoureeType”属性值修改为“0”,将“ReadOnly”属性值修改为“.T.”,选择表格控件“Grid2”,在表格控件属性窗口中将“RecordSource”属性值修改为“""”,将“RecordSourceType”属性值修改为“1”。 ④在表单设计器中,选择“Grid1”,在属性窗口中双击“AfterRowCol Change Event”,弹出事件过程代码编辑窗口,输入以下代码: SELECT*INTO CURSOR tmp FROM student WHERE班级编号= ThisForm.grid1.columns(1).text1.value ThisForm.Grid2.RecordSouTceType=1 ThisForm.Grid2.RecordSource="tmp" ThisForm Grjd2 Refresh ⑤选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd1”,保存在考生文件夹下,然后运行表单。

解析
转载请注明原文地址:https://kaotiyun.com/show/i4zp777K
0

最新回复(0)