數(shù)據(jù)庫應(yīng)用技術(shù)模擬試題(春)(000)-資料下載頁
2025-03-25 02:58本頁面
【正文】 能，程序運行界面如圖2所示，其中Text1課程號、Text2為課程名。進入界面后，用戶輸入所有數(shù)據(jù)后，點擊“確認(rèn)”按鈕后，將結(jié)果插入到課程表Courses中。請補充完成下列程序代碼。Command1圖2“增加記錄”窗體運行界面Private Sub Command1_Click()‘聲明一個記錄集對象Dim ADOrs As New Recordset‘將記錄集對象與已建立的數(shù)據(jù)庫聯(lián)接對象ADO綁定=ADO‘第一步：在課程表Courses中查詢是否存在關(guān)鍵字相同的記錄 （1）拼寫查詢字符串strSQL=“Select CNo From courses Where Cno=‘” + Text1 + “’” （2）執(zhí)行查詢語句 strSQL‘第二步：如果記錄已經(jīng)存在，則退出程序If Not Then MsgBox “記錄已存在，不能繼續(xù)增加” Exit Sub End If‘第三步：將結(jié)果插入到課程表Courses中 （1）拼寫Insert插入語句strSQL = （2）執(zhí)行Insert插入語句 strSQL End Sub參考答案及評分要點：‘第一步：在課程表Courses中查詢是否存在關(guān)鍵字相同的記錄 strSQL=“Select CNo From courses Where Cno=‘” + Text1 + “’” StrSQL （本小點4分）‘第二步：如果記錄已經(jīng)存在，則退出程序 If Not Then （本小點6分） MsgBox “記錄已存在，不能繼續(xù)增加” Exit Sub End If‘第三步：將結(jié)果插入到課程表Courses中strSQL = “Insert Into courses(Cno,CName) Values(‘”+Text1+“’,‘”+Text2+“’)” （本小點6分） strSQL （本小點4分） End Sub5 / 6
試題試卷相關(guān)推薦
鄂ICP備17016276號-1