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