【正文】
4IDQV select * from 教學(xué)成績表 , con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs 11 End Sub 信息查詢界面: 信息查詢界面代碼: Dim rs As New Dim con As New Private Sub Command1_Click() select * from 課程信息表 where 課程號 in (select 課程號 from 教學(xué)成績表 where 教師號 in (select 教師號 from 教師信息表 where 姓名 =39。 + + 39。)) , con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub Private Sub Command2_Click() select * from 教師信息表 where 教師號 in (select 教師號 from 教學(xué)成績表 where 課程號 in (select 課程號 from 課程信息表 where 課程名稱 =39。 + + 39。)), con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub Private Sub Command3_Click() select * from 課程信息表 where 課 程號 in (select 課程號 from 教學(xué)成績表 where 學(xué)號 in (select 學(xué)號 from 學(xué)生信息表 where 姓名 =39。 + + 39。)), con, adOpenKeyset, adLockOptimistic, adCmdText 12 Set = rs End Sub Private Sub Form_Load() Provider=。Integrated Security=SSPI。Persist Security Info=False。Initial Catalog=教學(xué)成績管理數(shù)據(jù)庫 。Data Source=7MZZQCR4HI4IDQV select * from 課程信息表 , con, adOpenKeyset, adLockOptimistic, adCmdText Set = rs End Sub 解題結(jié)果及對結(jié)果的分析: 總結(jié): 這次課程設(shè)計由 王斌 畫 商店職工會員的 ER 圖并將 ER 圖轉(zhuǎn)化為關(guān)系模式, 并 一起討論,增加了彼此之間的友誼,并熟練掌握了存儲過程 以及 調(diào)用 ,弄清楚了以前未弄懂的知識點 。 還了解了 怎樣創(chuàng)建 數(shù)據(jù)庫、 創(chuàng)建 表 和對表的修改插入數(shù)據(jù) 、 創(chuàng)建 視圖 以及 對 完整性的約束 的知識點 。 老師評語: 老師簽名 年 月 日 注:成績 分為優(yōu)、良、中、及格、不及格五級