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

admin2015-07-24  26

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

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

选项

答案步骤l:打开数据库,在命令窗口输入“Crea form testb”,新建一个表单。按题目要求添加控件并修改各控件的属性,如下: 表单的AutoCenter属性为“.T.一真”。 表单的Caption属性为“查询”。 标签的Caption属性为“学生注册日期”。 命令按钮1的Caption属性为“查询”。 命令按钮2的Caption属性为“退出”。 表格的RecordSoumeType属性为“4-SQL说明”。 步骤2:为表单添加数据环境“学生表”。 步骤3:输入查询按钮的Click事件代码。 ******"查询"按钮的Cliek事件代码****** 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学生表.年龄DE-SC" ****************** 步骤4:输入退出按钮的Click事件代码"ThisForm.Re-lease"。 步骤5:保存并按要求运行表单。

解析
转载请注明原文地址:https://jikaoti.com/ti/j5v0FFFM
0

最新回复(0)