打开考生文件夹下的SDB数据库,完成如下综合应用: 创建一个标题名为"查询"、文件名为testb的表单,如下图所示。 表单要求如下: (1)为表单建立数据环境,并向数据环境中添加"学生表"。 (2)表单启动后自动居中。 (3)向该表单中添加一个标

admin2013-08-29  28

问题 打开考生文件夹下的SDB数据库,完成如下综合应用:
创建一个标题名为"查询"、文件名为testb的表单,如下图所示。
   
表单要求如下:
(1)为表单建立数据环境,并向数据环境中添加"学生表"。
(2)表单启动后自动居中。
(3)向该表单中添加一个标签、一个文本框、一个表格和两个命令按钮。
① 标签对象(Label1)的标题文本为"学生注册日期",文本框(Text1)用于输入学生注册日期,表格(Grid1)用于显示结果。
② 命令按钮的功能如下:
a."查询"按钮(Command1)的功能是在该按钮的Click事件中使用SQL的SELECT命令从"学生表"中查询学生注册日期等于文本框中指定的注册日期的学生的学号、姓名、年龄、性别、班级和注册日期,查询结果按年龄降序排序,并将查询结果在表格控件中显示,同时将查询结果存储到表TABE中。
注意:查询结果存储到表TABE之前,应将表TABE中的记录清空。TABE表是已经建立好的表,它与学生表的结构不完全一样,多两个字段。
b."退出"按钮(Command2)的功能是关闭并释放表单。
注意:需将表格控件的RecordSourceType属性值设置为"4-SQL说明";
表单设计完成后,运行该表单,查询注册日期等于2005年9月2日的学生信息。

选项

答案【操作步骤】 步骤1:打开数据库,在命令窗口输入"Crea form testb",新建一个表单。按题目要求添加控件并修改各控件的属性,如下: 表单的AutoCenter属性为".T.-真"。 表单的Caption属性为"查询"。 标签的Caption属性为"学生注册日期"。 命令按钮1的Caption属性为"查询"。 命令按钮2的Caption属性为"退出"。 表格的RecordSourceType属性为"4-SQL说明"。 步骤2:为表单添加数据环境"学生表"。 步骤3:输入查询按钮的Click事件代码。 ******"查询"按钮的Click事件代码****** CLOSE ALL SELECT * FROM 学生表; WHERE 学生表.注册日期 = CTOD(ThisForm.Text1.Value); ORDER BY 学生表.年龄 DESC; INTO TABLE temp.dbf USE TABE DELE ALL PACK APPEND FROM TEMP THISFORM.GRID1.RECORDSOURCE="SELECT * FROM 学生表 WHERE 学生表.注册日期 = CTOD(ThisForm.Text1.Value) INTO CURSOR XX ORDER BY 学生表.年龄 DESC" *************************************** 步骤4:输入退出按钮的Click事件代码"ThisForm.Release"。 步骤5:保存并按要求运行表单。

解析 新建表单,按要求修改表单控件的属性,完成命令按钮的Click事件代码。
转载请注明原文地址:https://kaotiyun.com/show/0Jop777K
0

最新回复(0)