freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

vb編程環(huán)境下的高校學(xué)生成績管理系統(tǒng)設(shè)計(jì)研究(參考版)

2024-11-15 23:33本頁面
  

【正文】 2.評分方法(1)出勤率(2)課程設(shè)計(jì)準(zhǔn)備工作(3)課程設(shè)計(jì)期間紀(jì)律(4)課程設(shè)計(jì)運(yùn)行結(jié)果(5)課程設(shè)計(jì)報(bào)告(6)答辯情況指導(dǎo)教師: 系主任簽字:日期:403 年月日。” amp。 “”With Adodc1.Mode = adModeReadWrite.ConnectionString = provider amp。(2)ADO控件和數(shù)據(jù)庫的連接代碼:provider = “provider=”datasource = “data source=” amp。四、難點(diǎn)與提示:(1)本題目中數(shù)據(jù)庫文件的設(shè)計(jì)是關(guān)鍵,可按如下方法:,包含三個(gè)數(shù)據(jù)表:院系、專業(yè)和成績。③ 設(shè)計(jì)主界面,要求有菜單、工具欄和狀態(tài)欄,具體內(nèi)容按功能要求自行設(shè)計(jì)。:401根據(jù)問題描述,可以將問題解決分為以下幾個(gè)方面:① 進(jìn)行需求分析確定數(shù)據(jù)庫的結(jié)構(gòu),建立相應(yīng)的數(shù)據(jù)表。(6)“查詢”:可以根據(jù)院系、專業(yè)和年級(jí)進(jìn)行查詢。(4)“修改”:只允許修改學(xué)生成績,不允許修改姓名、院系、專業(yè)和年級(jí)。(2)經(jīng)過密碼檢驗(yàn)后,顯示主界面,以表格形式顯示數(shù)據(jù)庫中所有學(xué)生的成績信息。(4)用戶可以添加新的院系和專業(yè)名稱。(2)增加排名次的功能。③ 使用MSChart圖表控件繪制各種類型的圖表;使用MSFlexGrid表格控件顯示數(shù)據(jù)信息。:① 要求用ACCESS搭建數(shù)據(jù)庫。“ sql, conn, adOpenDynamic, adLockOptimisticIf Then39。 amp。判斷學(xué)號(hào)是否存在 rs(”name“)= rs(”sex“)= rs(”age“)= rs(”pro“)= MsgBox(”修改成功!“)ElseMsgBox(”學(xué)號(hào)不存在!“)End If End If End Sub 窗體Private Sub Form_Load()txtID = rs(”ID“)txtName = rs(”name“)txtSex = rs(”sex“)txtAge = rs(”age“) = rs(”pro“)End Sub添加學(xué)生返回Private Sub cmdReset_Click() Unload Me End Sub 提交Private Sub cmdSubmit_Click()If = ”“ ThenMsgBox(”學(xué)號(hào)不能為空!“) ElseIf = ”“ ThenMsgBox(”請輸入姓名!“) ElseIf = ”“ ThenMsgBox(”請輸入性別!“) ElseIf = ”“ ThenMsgBox(”年齡不能為空!“) ElseDim sql As StringSet conn = New Set rs = New Call openconnsql = ”select * from stuInfo where ID=39。 ”39?!?amp。 ”39?!?amp?!?sql1, conn, adOpenDynamic, adLockOptimistic sql2, conn, adOpenDynamic, adLockOptimisticIf Thenrs1(”ID“)= rs1(”Num“)= rs2(”Num“)MsgBox(”選課成功!“)ElseMsgBox(”已選過該課!“)End If End If End Sub 窗體Private Sub Form_Load()Dim sql As StringSet conn = New Set rs = New sql = ”select * from course“Call openconn sql, conn, adOpenDynamic, adLockOptimisticDo Until 39。 name amp。 and =“name = sql2 = ”select Num from course where name=39。 amp。 and name=39。 amp。sql1 = ”select * from course“ = adUseClient sql1, conn, adOpenDynamic, adLockOptimistic, adCmdTextSet = rs1 End Sub 窗體Private Sub Form_Load()Dim sql As StringSet conn = New Set rs = New Call openconnsql = ”select * from course“ sql, conn, adOpenDynamic, adLockOptimisticDo Until rs(”name“)Loop End Sub選課管理返回Private Sub cmdReturn_Click() Unload Me End Sub 提交Private Sub cmdSubmit_Click()If txtID = ”“ ThenMsgBox(”請輸入學(xué)號(hào)!“) ElseIf = ”“ ThenMsgBox(”請選擇課程!“)ElseDim sql1 As StringDim sql2, name As StringSet rs2 = New Set rs1 = New sql1 = ”select , from score , course where ID=39。 ”39。“ amp。獲取選中行的第5列數(shù)據(jù)End Sub 窗體Private Sub Form_Load()Dim sql As StringSet conn = New Set rs = New Call openconnsql = ”select * from stuInfo“ = adUseClient sql, conn, adOpenDynamic, adLockOptimistic, adCmdTextSet = rs 39。 = (4)39。 ”39?!?amp。 ”39?!?amp?!? sql, conn, adOpenDynamic, adLockOptimistic If ThenMsgBox ”用戶不存在!“ElseUnload Me End If End If End Sub退出Private Sub cmdRegister_Click()Unload Me End Sub功能選擇選課管理Private Sub cmdChoice_Click() Unload Me End Sub 退出Private Sub cmdExit_Click()End End Sub 查詢Private Sub cmdFind_Click() Unload Me End Sub 成績管理Private Sub cmdGrade_Click() Unload Me End Sub 學(xué)生管理Private Sub cmdStu_Click() Unload Me End Sub學(xué)生管理添加Private Sub cmdAdd_Click() Unload Me End Sub 刪除Private Sub cmdDel_Click() MsgBox(”刪除成功!“)End Sub 編輯Private Sub cmdEdit_Click() Unload Me End Sub 查找Private Sub cmdFind_Click()39。 Trim()amp。 and password=39。 Trim()amp。新版)》.機(jī)械工業(yè)出版社,2004,1 [13] 魯沐浴.《C語言最新編程技巧200例》.電子工業(yè)出版社,1997,1[14] 梁翎,李愛齊.《C語言程序設(shè)計(jì)實(shí)用技巧與程序?qū)嵗?上??破粘霭嫔?1996,5 [15] 陳國章.《Turbo C程序設(shè)計(jì)技巧與應(yīng)用實(shí)例》.天津科學(xué)技術(shù)出版社,1995,5 [16] 王士元.《C高級(jí)實(shí)用程序設(shè)計(jì)》.清華大學(xué)出版社,1996,6第四篇:學(xué)生成績管理系統(tǒng)VB程序登陸登陸Private Sub cmdLogin_Click()If = “ ThenMsgBox(”請輸入用戶名!“) Else Call openconn sql = ”select * from login where username=39。感謝指導(dǎo)老師的耐心輔導(dǎo)。在本次畢業(yè)設(shè)計(jì)中,我要向我的指導(dǎo)老師致以深深的謝意,感謝指導(dǎo)老師在這段時(shí)間里在學(xué)習(xí)上和生活上所給予的悉心的教誨和無微不至的幫助,在我感覺到自己知識(shí)有所貧乏的時(shí)候給了我細(xì)心的指導(dǎo)和技術(shù)上的支持。在我做設(shè)計(jì)的過程遇到了許多的困難。隨著系統(tǒng)應(yīng)用范圍的擴(kuò)大,應(yīng)用環(huán)境的變化,系統(tǒng)中的各種代碼都需要進(jìn)行一定程度的增加、修改、刪除,以及設(shè)置新的代碼。本
點(diǎn)擊復(fù)制文檔內(nèi)容
數(shù)學(xué)相關(guān)推薦
文庫吧 www.dybbs8.com
備案圖鄂ICP備17016276號(hào)-1