(1)将customerl表中的全部记录追加到customer表中,然后用SQL SELECT语句完成查询:列出目前有订购单的客户信息(即有对应的order list记录的customer表中的记录),同时要求按“客户号”升序排序,并将结果存储到。resu

admin2015-12-11  31

问题 (1)将customerl表中的全部记录追加到customer表中,然后用SQL SELECT语句完成查询:列出目前有订购单的客户信息(即有对应的order list记录的customer表中的记录),同时要求按“客户号”升序排序,并将结果存储到。results表中(表结构与customer表结构相同)。
(2)打开并按如下要求修改forml表单文件(最后保存所做的修改):
①在“确定”命令按钮的Click事件(过程)下的程序有两处错误,请改正。
②设置Text2控件的有关属性,使用户在输入口令时显示“*”(星号)。

选项

答案(1) 【操作步骤】 步骤1:命令窗口执行: SELECT*FROM cutomerl INTO ARRAY temp INSERT INTO customer FROM ARRAY temp. 将customerl表中的记录全部复制到customer表中。 步骤2:在命令窗口执行命令: SELECT DISIlINCT CUStomer.*; &&DISTINCT短语的功能是消除查询结果中相同的记录 FROM 订货管理!customer INNER JOIN 订货管理! order list; ON customer.客户号=Order—list.客户号; ORDER BY customer.客户号; INTO TABLE results.dbf (2) 【操作步骤】 步骤1:命令窗口执行:MODIFY FORM forml,打开表单设计器修改表单。 步骤2: “确定”按钮的Click事件中代码如下: &&功能:如果用户输入的用户名和口令一致,则在提示信息后关闭该表单 &&否则重新输入用户名和口令 *****ERROR************* IF THISFORM.TEXTl=THISFORM.TEXT2 WAIT”欢迎使用……”WINDOW TIMEOUT,1 *********ERROR*************** THISFORM.CIOSE ELSE WAIT“用户名或口令不对,请重新输入……”WINDOW TIMEOUT 1 ENDIF 修改后的代码如下:IE THISEORM.TEXT1.VALUE = THIS.FORM. TEXT2.VALUE &&原代码语句中缺少指定VALUE属性 WAIT“欢迎使用……”WINDOW TIMEOUT 1 THISFORM.RELEASE &&关闭表单的短语是RELEASE,而不是CLOSEELSE WAIT“用户名或口令不对 请重新输入……”WINDOW TIMEOUTENDTF 步骤3:修改文本框(TEXT2)控件PasswordChar属性值为:*。 步骤4:单击“常用”工具栏中的“运行”按钮查看结果,将表单文件保存到考生文件夹下。

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

最新回复(0)