【正文】 Prog8_2⑤ 在 Prog8_2 的編輯窗口中輸入如下代碼CLEARFOR i=100 TO 999此處為方法 1 或方法 2 代碼IF i=a^3+b^3+c^3? iENDIFENDFORRETURN⑥ 在命令窗口中輸入 DO Prog8_2，運行結果如圖 圖 設計及運行結果練習 3：編寫程序 ，統(tǒng)計 Student 表中民族為漢族的男、女生人數(shù)。操作步驟如下：① 在命令窗口中輸入 Modify Command Prog8_3② 在 Prog8_3 的編輯窗口中輸入如下代碼CLEAROPEN DATABASE xsglUSE Student IN 0SELECT StudentSTORE 0 TO man,woman實驗 8 結構化程序設計二SCAN FOR 民族=”漢族” IF 性別=”男”man=man+1 ELSEWoman=woman+1 ENDIFENDSCAN? “男生人數(shù)”,man? “女生人數(shù)”,womanCLOSE DATABASERETURN③ 在命令窗口中輸入 DO Prog8_3，運行結果如圖 圖 設計及運行結果2. 子程序結構的程序設計與調試練習 4：編寫程序 Prog8_4,理解子程序的調用及變量的作用域操作步驟如下：① 在命令窗口中輸入 Modify Command Prog8_3② 在 Prog8_3 的編輯窗口中輸入如下代碼PROCEDURE XYZPARA x, y, zPUBLIC i, mSTORE 5 TO i, m, ni=x+yx=y+zy=m+n? x, y, zRETURNSTORE 10 TO a, b, c實驗 8 結構化程序設計二DO XYZ WITH a, a+b, 10? a, b, c? i, m, nRETURN③ 在命令窗口中輸入 DO Prog8_4，觀察并分析運行結果，如圖 圖 設計及運行結果三、練習與提高1. Visual FoxPro 支持的循環(huán)結構控制語句有幾種？哪種循環(huán)結構控制語句可以事先設定循環(huán)次數(shù)？2. 使用 Do While 循環(huán)控制語句應特別注意避免出現(xiàn)什么情況？3. 有一數(shù)列，前兩個數(shù)是 1，第三個數(shù)是前兩個數(shù)之和，以后的每個數(shù)都是其前兩個數(shù)之和，編寫程序，要求輸出此數(shù)列的第 30 個數(shù)。4. 求 100 之內所有素數(shù)。5. 利用 SCAN…ENDSCAN 語句編寫程序，統(tǒng)計 SCORES 表中分數(shù)大于 80 的學生人數(shù)。實驗 9 查詢與視圖設計實驗 9 查詢與視圖設計一、實驗目的1． 掌握利用“查詢設計器”創(chuàng)建單表和多表查詢的方法。2． 掌握利用“視圖設計器”單表視圖和多表視圖的方法。3． 掌握用視圖更新數(shù)據(jù)的方法。二、實驗內容學會使用基于單表的查詢、基于相關表的查詢、創(chuàng)建分組查詢、創(chuàng)建單表視圖及多表視圖。三、實驗步驟1 創(chuàng)建單表查詢（2） 單擊主菜單“文件”下拉菜單中的“新建”命令，在“新建”對話框中選擇“查詢”，打開“查詢設計器”。（3） 在“添加表或視圖”對話框中，選擇XSGL數(shù)據(jù)庫中的“Student”表，單擊“添加”按鈕將其添加到“查詢設計器”中，單擊“關閉”按鈕關閉對話框。如圖91所示。圖91 查詢設計器（4） 雙擊字段“學號”、“姓名”、“性別”、“專業(yè)”，將這四個字段添加到“選定字段”中。（5） 點擊“排序依據(jù)”選項卡，雙擊“學號”添加到“排序條件”中，“排序選項”為“升序”。（6） 在“查詢設計器”中點擊右鍵，彈出如圖92快捷菜單，選擇“運行查詢”（或者可以點擊工具欄“運行”按鈕 ，或使用快捷鍵“Ctrl+E”）。實驗 9 查詢與視圖設計圖92 運行查詢（7） 關閉瀏覽窗口，點擊“查看SQL”，即可顯示該查詢的SQL語句：SELECT , , , 。 FROM xsgl!student。 ORDER BY （8） 關閉“SQL查詢”，點擊“輸出設置”，彈出如圖93所示對話框，這里“查詢”提供了七種查詢輸出去向：“瀏覽”、“臨時表”、“表”、“圖形”、“屏幕”、“報表”、“標簽”。圖93 查詢去向（9） 輸出去向選擇“屏幕”，彈出如圖94對話框，“次級輸出”選擇“到文本文件”，在右廣西框中輸入文本文件名“學生情況表”。點擊“確定”，退出“查詢去向”以對話框。實驗 9 查詢與視圖設計圖94 查詢輸出到“屏幕”（10） 執(zhí)行第（5）步，查看查詢輸出。2 創(chuàng)建多表查詢(1) 打開“查詢設計器”，在“添加表或視圖”對話框中添加表Student、表Scores。由于在數(shù)據(jù)庫中已經(jīng)為這兩個設置了永久關系，則“查詢設計器”自動將該關系添加進來。如圖95所示。圖95 多表查詢界面(2) 將“” 、 “” 、 “” 、 “”、“Scores.分數(shù)”、“”添加到“選定字段”。(3) “排序依據(jù)”選擇“Student .學號” 。(4) 在右鍵菜單是點擊“輸出設置” ， “輸出去向”選擇“表” 。(5) 將查詢以“”保存。(6) 打開并查看“S_1 ”表。實驗 9 查詢與視圖設計3 創(chuàng)建分組查詢(1) 打開“查詢設計器”，在“添加表或視圖”對話框中添加表Scores。(2) 將“學號”添加到“選定字段”。(3) 點擊“函數(shù)和表達式”文本框右側按鈕，彈出表達式生成器。在“數(shù)學”中選“AVG（expN）”函數(shù)，參數(shù)選擇“分數(shù)”，如圖96所示。點“確定”退出表達式生成器。圖96 表達式生成器(4) 在“函數(shù)和表達式”文本框中生成“AVG(Scores. 分數(shù) )”，點擊“添加” ，添加到“選定字段”中，如圖97所示。圖97 添加“AVG(Scores. 分數(shù))”到選定字段(5) “排序依據(jù)”選擇“學號” 。實驗 9 查詢與視圖設計(6) 在“分組依據(jù)”中將“學號”作為分組字段。(7) 運行查詢，查看查詢結果。4 創(chuàng)建單表視圖(1) 首先打開“XSGL”數(shù)據(jù)庫，單擊主菜單“文件”下拉菜單中的“新建”命令，在“新建”對話框中選擇“視圖”，打開“視圖設計器”。(2) 在“添加表或視圖”對話框中，選擇XSGL數(shù)據(jù)庫中的“Student”表，單擊“添加”按鈕將其添加到“視圖設計器”中，單擊“關閉”按鈕關閉對話框。視圖設計器如圖98所示。圖98 視圖設計器(3) 添加“學號” 、 “姓名” 、 “出生日期” 、 “性別”到“選定字段” 。(4) 在“更新條件”選項卡下，將“出生日期”和“性別”字段設為可更新字段，選擇“發(fā)送SQL更新”復選框。如圖99所示。圖99 視圖設計器更新條件(5) 單擊工具欄上的運行按鈕運行視圖，在“瀏覽”窗口中查看結果。關閉“視圖設計器”，在“保存”對話框中輸入視圖名“ST_1”保存視圖。實驗 9 查詢與視圖設計(6) 在“數(shù)據(jù)庫設計器”中，打開視圖“ST_1” ，將學號為“90101001”的出生日期修改為“09/09/90” ，關閉視圖。(7) 打開“” ，查看學號為“90101001”的出生日期是否已更新。5 創(chuàng)建多表視圖(1)首先打開“XSGL”數(shù)據(jù)庫，單擊主菜單“文件”下拉菜單中的“新建”命令，在“新建”對話框中選擇“視圖”，打開“視圖設計器”。(2)在“添加表或視圖”對話框中，選擇XSGL數(shù)據(jù)庫中的“Student”表和“Scores”表。以后步驟按創(chuàng)建單表視圖過程進行，完成對視圖的創(chuàng)建。四、練習與提高1. 查詢和視圖都是為快速、方便地使用數(shù)據(jù)庫中的數(shù)據(jù)提供的一種方法，它們有什么異同。2. 建立不同的查詢或視圖，通過“查看SQL”初步學習SQL語言簡單應用。3. 使用“遠程視圖向導”創(chuàng)建一個遠程視圖。實驗 10 SQL 查詢設計一實驗 10 SQL 查詢設計一一、實驗目的1. 掌握 SQL 數(shù)據(jù)創(chuàng)建命令 Create Table、Create Database 的使用。2. 掌握 SQL 數(shù)據(jù)修改命令 Alter Table、Modify Database 的使用。3. 掌握 SQL 數(shù)據(jù)刪除命令 Drop Table 的使用。4. 熟練掌握 SQL 語言的數(shù)據(jù)操作命令的使用，包括INSERT、UPDATE、DELETE。二、實驗內容及操作步驟1. 數(shù)據(jù)創(chuàng)建命令的使用方法練習 1：用 SQL 命令建立訂貨管理()數(shù)據(jù)庫，同時建立職工 (zg)、倉庫(ck)、供應商(gys) 、訂貨單 (dhd) 數(shù)據(jù)庫表。表說明如下：表名 職工表（） 倉庫表（） 供應商表（）字段名 職工號 倉庫號 工資 倉庫號 地址 面積 供應商號 供應商名 城市字段類型 C C I C C I C C C字段寬度 5 5 5 10 5 20 10訂貨單（ ）字段名 訂貨單號 職工號 供應商號 訂貨日期字段類型 C C C D字段寬度 5 5 5 要求：① 職工表中職工號建立主索引② 倉庫表中倉庫號建立主索引，面積需大于零③ 訂貨單表中訂購單號建立主索引操作步驟如下：① 在命令窗口輸入 CREATE DATABASE dhgl② 在命令窗口逐次運行如下 4 條命令行：CREATE TABLE zg(職工號 C(5) PRIMARY KEY,倉庫號 C(5),工資 I) CREATE TABLE ck(倉庫號 C(5) PRIMARY KEY,地址 C(10),面積 I CHECK(面積0) ERROR “面積應該大于 0！”)CREATE TABLE gys(供應商號 C(5) ,供應商名 C(20),城市 C(10))CREATE TABLE dhd(訂貨單號 C(5) PRIMARY KEY,職工號 C(5),供應商號 C(5),訂貨日期 D)建表結果如圖 101 所示：實驗 10 SQL 查詢設計一圖 1012. 數(shù)據(jù)修改命令的使用方法練習 2：用 SQL 命令完成如下要求，最后用表設計器查看各表結構① 為表 gys 以供應商號為關鍵字建立主索引② 為表 zg 增加工資字段的有效性規(guī)則：共資范圍在 2022~8000 元之間，默認值為 3000③ 為表 zg 增加姓名字段，寬度為 10④ 為表 dhd 增加總金額貨幣型字段,并設置有效性規(guī)則⑤ 修改 dhd 表中訂貨單表的供應商號字段允許 NULL 值操作步驟如下：① 在命令窗口中輸入 ALTER TABLE GYS ADD PRIMARY KEY 供應商號② ALTER TABLE ZG ALTER 工資 SET DEFAULT 3000ALTER TABLE ZG ALTER 工資 SET CHECK(工資=2022 .AND. 工資=8000) ERROR 工資值的范圍在 20228000 之間?、?ALTER TABLE ZG ADD 姓名 C(10)④ ALTER TABLE DHD ADD 總金額 Y CHECK 總金額=0 ERROR “總金額應該大于 0！”⑤ ALTER TABLE DHD ALTER 供應商號 NULL表設計器查看如圖 102 實驗 10 SQL 查詢設計一圖 1023. SQL 語言中數(shù)據(jù)操作命令的使用方法練習 3：利用 SQL 插入、更新、刪除語句完成如下要求① 向職工表（ZG）中插入如下記錄（”DX011”,”CKH03”,3500,”謝濤”）向訂貨單表（DHD）中插入如下記錄（”HD012”,”DX004”,”GY003”,2022/08/28,50000）② 更新倉庫表中 CKH05 的面積增加 100給職工表中倉庫號為 CKH03 的職工工資提高 15%③ 刪除目前沒有訂貨日期的訂貨單記錄刪除面積小于 200 的倉庫記錄操作步驟如下：⑦ 在命令窗口中輸入 OPEN DATABASE dhgl⑧ 在命令窗口中輸入 INSERT INTO ZG(職工號, 姓名,倉庫號,工資) VALUES(“DX011”,” 謝濤”, ”CKH03”,3500)或 INSERT INTO ZG VALUES(“DX011”,”CKH03”,350,”謝濤”)⑨ INSERT INTO DHD(訂貨單號, 職工號,供應商號,訂貨日期,總金額) VALUES(”HD012”,”DX004”,”GY003”,{^20220828},50000)⑩ UPDATE CK SET 面積=面積+100 WHERE 倉庫號=”CKH05”? UPDATE ZG SET 工資=工資* WHERE 倉庫號=”CKH03”? DELETE FROM DHD WHERE 訂貨日期=.NULL.? DELETE FROM CK WHERE 面積200操作結果如圖 103 所示實驗 10 SQL 查詢設計一圖 103三、練習與提高1. CREAT TABLE 命令建表時能否候選索引？如何建立？2. ALTER 命令中 ADD 和 ALTER 關鍵詞分別應用于什么情況之下？3. 如何使用 SQL 命令刪除職工表中的姓名字段？4. 使用 SQL 語句建立一個學生管理數(shù)據(jù)庫，其中至少包括學生、課程、成績三個表，可以更具自己的理解決定有哪些字段和完整性約束。實驗 11 SQL 查詢設計二實驗 11 SQL 查詢設計二一、實驗目的1. 熟練掌握 SQL 的基本查詢命令。2. 熟練掌握 SQL 的簡單的聯(lián)接查詢命令語句。3. 熟練掌握 SQL 的嵌套查詢語句