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

admin2013-11-12  33

问题 打开考生文件夹下的SDB数据库,完成如下综合应用:
    创建一个标题名为“查询”、文件名为testb的表单,如下图所示。

    表单要求如下:
    (1)为表单建立数据环境,并向数据环境中添加“学生表”。
    (2)表单启动后自动居中。
    (3)向该表单中添加一个标签、一个文本框、一个表格和两个命令按钮。
    ①标签对象(Labell)的标题文本为“学生注册日期”,文本框(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属性为“退出”。 表格的RecordS0urceType属性为“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.GRlD1.RECORDSOURCE=“SELECT *FROM学生表WHERE学生表.注册日期=CTOD(ThisForM.Text1.Value)INTO CURSOR XX ORDER BY学生表.年龄DESC” *************************************************** 步骤4:输入退出按钮的Click事件代码“ThisForm.Release”。 步骤5:保存并按要求运行表单。

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

最新回复(0)