【正文】 南京 J5 JN5 上海 J6 JN6 武漢 J7 JN7 上海31 / 39（2）取出所在城市為上海的所有工程的全部細(xì)節(jié)；SELECT * FROM JB WHERE CITY=’上海’ TO SCREEN JN JNAME CITY J1 JN1 上海 J5 JN5 上海 J7 JN7 上海（3）取出重量最輕的零件代號(hào)；SELECT PN FROM PBWHERE WEIGHT= （SELECT MIN (WEIGHT) FROM PB）TO SCREEN PN P5（4）取出為工程 J1 提供零件的供應(yīng)商代號(hào)；SELECT SN FROM SPJB WHERE JN＝’JI’ TO SCREEN SN S1 S2 S3（5）取出為工程 J1 提供零件 P1 的供應(yīng)商代號(hào)；SELECT SN FROM SPJB。WHERE JN=’JI’ AND PN=’P1’ TO SCREEN SN S1（6）取出由供應(yīng)商 S1 提供零件的工程名稱(chēng)；SELECT FROM JB, SPJB。WHERE = AND =’S1’ TO SCREEN JNAME JN1 JN4（7）取出供應(yīng)商 S1 提供的零件的顏色；SELECT DISTINCT FROM PB, SPJB。WHERE = AND =’S1’ TO SCREEN COLOR 紅（8）取出為工程 J1 或 J2 提供零件的供應(yīng)商代號(hào)；SELECT DISTINCT SN FROM SPJB。WHERE JN=’JI’ OR JN=’J2’ TO SCREEN32 / 39 SN S1 S2 S3 S5（9）取出為工程 J1 提供紅色零件的供應(yīng)商代號(hào)；SELECT DISTINCT FROM SPJB, PB。WHERE = AND =’JI’ AND =’紅’ TO SCREEN SN S1（10）取出為所在城市為上海的工程提供零件的供應(yīng)商代號(hào)；SELECT DISTINCT FROM SPJB, JB。 WHERE = AND =’上?！?TO SCREEN SN S1 S2 S3 S4 S5（11）取出為所在城市為上?；虮本┑墓こ烫峁┘t色零件的供應(yīng)商代號(hào)；SELECT FROM PB, JB, SPJB。WHERE = AND = AND =’紅’。 AND (=’上?！? OR =’北京’) TO SCREEN SN S1 S4（12）取出供應(yīng)商與工程所在城市相同的供應(yīng)商提供的零件代號(hào)；SELECT DISTINCT FROM SB, JB, SPJB。WHERE = AND = AND = TO SCREEN PN P1 P2 P3 P4 PS P6（13）取出上海的供應(yīng)商提供給上海的任一工程的零件的代號(hào)；33 / 39SELECT FROM SB, JB, SPJB。WHERE = AND = AND =’上海’； AND =’上海’ TO SCREEN PN P1 P6（14）取出至少由一個(gè)和工程不在同一城市的供應(yīng)商提供零件的工程代號(hào)；SELECT DISTTCT FROM SB, JB, SPJB。WHERE = AND = AND TO SCREEN JN J1 J2 J3 J4 J5 J6 J7（15）取出上海供應(yīng)商不提供任何零件的工程的代號(hào)；SELECT DISTINCT JN FROM SPJB。WHERE JN NOT IN。 (SELECT DISTINCT FROM SB, SPJB。WHERE = AND =’上?！? TO SCREEN JN J2 J5 J6（16）取出這樣一些供應(yīng)商代號(hào)，它們能夠提供至少一種由紅色零件的供應(yīng)商提供的零件；SELECT DISTINCT FROM PB, SPJB。WHERE IN。(SELECT FROM SPJB, SB, PB。WHERE = AND = AND =’紅’) TO SCREEN SN S1 S3 S434 / 39 S5（17）取出由供應(yīng)商 S1 提供零件的工程的代號(hào)；SELECT DISTINCT FROM SB, PB, SPJB。WHERE = AND = AND =’S1’ TO SCREENJN J1 J4（18）取出所有這樣的一些CITY，CITY二元組，使得第 1 個(gè)城市的供應(yīng)商為第 2 個(gè)城市的工程提供零件；SELECT DISTINCT , FROM SB, JB, SPJB。WHERE = AND = TO SCREEN CITY_A CITY_B 北京 廣州 北京 南京 北京 上海 北京 武漢 南京 廣州 南京 南京 南京 上海 上海 南京 上海 上海（19）取出所有這樣的一些CITY，PN，CITY三元組，使得第 1 個(gè)城市的供應(yīng)商為 2 個(gè)城市的工程提供指定的零件；SELECT DISTINCT , , FROM SB, JB, SPJB。WHERE = AND = TO SCREEN CITY_A PN CITY_B 北京 P3 廣州 北京 P3 南京 北京 P3 上海 北京 P3 武漢 北京 P4 廣州 北京 P5 廣州 南京 P1 南京 南京 P2 廣州 南京 P2 南京 南京 P3 南京 南京 P4 南京35 / 39 南京 P5 南京 南京 P5 上海 南京 P6 廣州 南京 P6 南京 上海 P1 南京 上海 P1 上海 上海 P6 南京 上海 P6 上海（20）重復(fù)（19）題，但不檢索兩個(gè) CITY 值相同的三元組。SELECT DISTINCT , , FROM SB, JB, SPJB。WHERE = AND ＝ AND TO SCREEN CITY_A PN CITY_B 北京 P3 廣州 北京 P3 南京 北京 P3 上海 北京 P3 武漢 北京 P4 廣州 北京 P5 廣州 南京 P2 廣州 南京 P5 上海 南京 P6 廣州 上海 P1 南京 上海 P6 南京2．設(shè)有有以下基本表：（1）供應(yīng)商表（供應(yīng)商編號(hào)，供應(yīng)商名稱(chēng)，供應(yīng)商所在城市）；（2）零件表（零件編號(hào)，零件名稱(chēng)，零件顏色，零件重量）；（3）工程項(xiàng)目表（工程編號(hào)，工程名稱(chēng)，工程所在城市）；（4）工程供貨表（工程編號(hào)，供應(yīng)商編號(hào)，零件編號(hào)，零件數(shù)量）?！　∮?SQL 語(yǔ)言寫(xiě)出下列查詢(xún)語(yǔ)句，　?。?）查詢(xún)所有工程的全部細(xì)節(jié)：　　SELECT * FROM 工程項(xiàng)目表　?。?）查詢(xún)所在城市為上海的所有工程的全部細(xì)節(jié)　　SELECT * FROM 工程項(xiàng)目表 WHERE 工程所在城市 =’上?！　。?）查詢(xún)重量最輕的零件代號(hào)36 / 39　　SELECT 零件編號(hào) FROM 零件表 WHERE 零件重量 =　　(SELECT MIN(零件重量) FROM 零件表) 　　（4）查詢(xún)?yōu)楣こ叹幪?hào)為“JG2022001”的工程提供零件的供應(yīng)商編號(hào)　　SELECT 供應(yīng)商編號(hào) FROM 工程供貨表 WHERE 工程編號(hào)=’JG2022001 ’　?。?）查詢(xún)?yōu)楣こ叹幪?hào)為“JG2022001”的工程提供零件編號(hào)為“P1”的供應(yīng)商編號(hào)　　SELECT 供應(yīng)商編號(hào) FROM 工程供貨表　　WHERE 工程編號(hào) =’JG2022001’ AND 零件編號(hào)=’P1’　?。?）查詢(xún)由供應(yīng)商編號(hào)為 S1 的供應(yīng)商提供零件的工程名稱(chēng)　　SELECT FROM 工程項(xiàng)目表,工程供貨表　　WHERE 工程項(xiàng)目表 .工程編號(hào)= AND =’S1’　?。?）查詢(xún)供應(yīng)商 S1 提供的零件的顏色　　SELECT DISTINCT FROM 零件表,工程供貨表　　WHERE 零件表 .零件編號(hào)= AND =’S1’　?。?）查詢(xún)?yōu)樗诔鞘袨樯虾５墓こ烫峁┝慵墓?yīng)商編號(hào)　　SELECT DISTINCT FROM 工程項(xiàng)目表,工程供貨表　　WHERE 工程供貨表 .工程編號(hào)= AND =’上?！　?．用 SQL 語(yǔ)句創(chuàng)建簡(jiǎn)單數(shù)據(jù)表　　設(shè)有兩個(gè)關(guān)系（1）教師關(guān)系 T，包括教師編號(hào) TNo，姓名 TN，系別 TD，職稱(chēng)RANK；（2）課程關(guān)系 C，包括課程號(hào) CNo，課程名 CN。教師編號(hào)和課程號(hào)分別是上述兩個(gè)關(guān)系的主鍵，請(qǐng)用 SQL 語(yǔ)句創(chuàng)建教師數(shù)據(jù)表 T?！　⒖即鸢福骸　REATE TABLE T{　　TNo INT PRIMARY KEY,37 / 39　　TN CHAR(30),　　TD CHAR(20),　　RANK CHAR(20)　　}?！　?．用 SQL 語(yǔ)句創(chuàng)建數(shù)據(jù)表　　在上題基礎(chǔ)上，假設(shè)還存在教師教授課程關(guān)系 TC，包括教師編號(hào) TNo 和課程號(hào)CNo。　　注意：說(shuō)明主鍵碼和外鍵碼約束　　參考答案：　　CREATE TABLE TC{　　TNo INT,　　CNo INT,　　PRIMARY KEY (Tno,Cno),　　FOREIGN KEY (TNo) REFERENCES T(TNo),　　FOREIGN KEY (CNo) REFERENCES C(CNo)　　}。　　4．利用 SQL 語(yǔ)句進(jìn)行查詢(xún)　　在上題的基礎(chǔ)上，如果要查詢(xún)“張紅老師承擔(dān)的所有課程”，請(qǐng)寫(xiě)出對(duì)應(yīng)的 SQL 查詢(xún)語(yǔ)句?！　⒖即鸢福骸　ELECT ， FROM T，C ，TC　　WHERE = AND = AND =’張紅’　　5．程序應(yīng)用題　　設(shè)學(xué)生成績(jī)表的結(jié)構(gòu)為（學(xué)號(hào)、課程號(hào)、成績(jī)），程序運(yùn)行界面如圖 1 所示。進(jìn)入界面后，用戶(hù)首先選擇學(xué)號(hào)（Combo1）、課程號(hào)(Combo2) ，姓名(Text1)和課程名(Text2)從38 / 39數(shù)據(jù)庫(kù)中自動(dòng)讀入；然后，用戶(hù)輸入對(duì)應(yīng)的成績(jī)（Text3），點(diǎn)擊“確認(rèn)”按鈕后，將結(jié)果插入到學(xué)生成績(jī)表中。請(qǐng)補(bǔ)充完成下列程序代碼。圖 1“增加記錄”窗體運(yùn)行界面　　Private Sub Command1_Click()　　‘聲明一個(gè)記錄集對(duì)象　　Dim ADOrs As New Recordset　　‘將記錄集對(duì)象與已建立的數(shù)據(jù)庫(kù)聯(lián)接對(duì)象 ADO 綁定　　=ADO　　‘第一步：在學(xué)生成績(jī)表中查詢(xún)是否存在關(guān)鍵字相同的記錄　?。?）拼寫(xiě)查詢(xún)字符串　　strSQL =“”　　（2）執(zhí)行查詢(xún)語(yǔ)句　　strSQL　　‘第二步：如果關(guān)鍵字重復(fù)，則退出程序　　If Not Then　　MsgBox “ 記錄已存在，不能繼續(xù)增加”　　Exit Sub39 / 39　　End If　　‘第三步：將結(jié)果插入到學(xué)生成績(jī)表中　　StrSQL=”Insert Into 學(xué)生成績(jī)表(學(xué)號(hào),課程號(hào),成績(jī))Values(‘ ”++” ‘,’ “++” ‘, “+Str(Val())+”)”　　StrSQL　　End Sub　　參考答案及評(píng)分要點(diǎn)：　　‘第一步：在學(xué)生成績(jī)表中查詢(xún)是否存在關(guān)鍵字相同的記錄　　strSQL=” Select * From 學(xué)生成績(jī)表 Where 學(xué)號(hào)=’ ”++” ‘ And 課程號(hào)=’ “++” ‘ “　　 StrSQL 　　‘第二步：如果關(guān)鍵字重復(fù)，則退出程序　　If Not Then 　　MsgBox “ 記錄已存在，不能繼續(xù)增加”　　Exit Sub　　End If　　‘第三步：將結(jié)果插入到學(xué)生成績(jī)表中　　StrSQL=”Insert Into 學(xué)生成績(jī)表(學(xué)號(hào),課程號(hào),成績(jī))Values(‘ ”++” ‘,’ “++” ‘, “+Str(Val())+”)”　　 StrSQL 　　End Sub