學(xué)生信息管理系統(tǒng)vb課程設(shè)計-資料下載頁
2025-04-07 23:06本頁面
【正文】 Column + 39。 (cmdFindStudent).CommandText = sqlstr 39。刷新Grid,這兩句不可省 = !StudentID = !StudentName = !Class = !Gender = !AcceptanceTime = !Dormitory = !Hometown sqlstr = select * from ScoreTable where StudentID=39。 + strColumn + 39。 (cmdScore).CommandText = sqlstr 39。刷新Grid,這兩句不可省 = !chinese = !maths = !english = !politics = !physics = !chemistry = False = TrueEnd Sub 用戶注冊界面設(shè)計如圖44。圖44 用戶注冊界面注冊控件編碼：Private Sub cmdReg_Click() 39。Dim cmd As Command Usertype = General State = 1 Set cmd = New Command (conLibrary).Open = (conLibrary) = insert into UserTable(UserName,RealName,Unit,pwd,RegisterTime,age,state,usertype) values(39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 amp。 39。,39。 amp。 Now amp。 39。,39。 amp。 amp。 39。,39。 amp。 State amp。 39。,39。 amp。 Usertype amp。 39。) = select * from usertable where username=39。 amp。 txtUserName amp。 39。 39。子段不要使用關(guān)鍵字“PassWord” 39。驗證重要信息已經(jīng)填寫 If = Then MsgBox 請?zhí)顚懹脩裘? vbOKOnly + vbInformation, 注意 Exit Sub ElseIf = Then MsgBox 請?zhí)顚懨艽a！, vbOKOnly + vbInformation, 注意 Exit Sub ElseIf = Then MsgBox 請?zhí)顚懘_認密碼！, vbOKOnly + vbInformation, 注意 Exit Sub End If If Then MsgBox 兩次密碼不相同，請重新填寫！, vbOKOnly + vbInformation, 注意 = = Exit Sub End If On Error GoTo exit1 If Not IsExistUser(txtUserName, ) Then 39。添加用戶 txtUserName, txtPassword, txtRealname, txtUnit, Now, udAge, Usertype, State MsgBox 注冊成功！, vbOKOnly + vbInformation, 注意 Unload Me Else MsgBox 用戶已經(jīng)存在！請重新注冊一個新的用戶名, vbOKOnly + vbInformation, 注意 = = = End If Exit Subexit1: MsgBox 數(shù)據(jù)未成功寫入數(shù)據(jù)庫！, vbOKOnly + vbInformation, 錯誤 Exit SubEnd Sub第5章 課設(shè)總結(jié)時光短暫，短短的課程設(shè)計即將結(jié)束，報告基本完成。從最初的茫然，到慢慢的進入狀態(tài)，再到對思路逐漸的清晰，整個設(shè)計過程難以用語言來表達。歷經(jīng)一周的奮戰(zhàn)，緊張而又充實課程設(shè)計終于落下了帷幕?，F(xiàn)在回頭想想這幾天的經(jīng)歷和感受，我感慨萬千，在這次課程設(shè)計的過程中，我擁有了無數(shù)的回憶和收獲。這次設(shè)計報告的制作過程是我的一次再學(xué)習(xí)，再提高的過程。在報告中我充分運用了大學(xué)期間所學(xué)到的知識，也學(xué)會了如何使用所學(xué)的知識去解決一些實際問題。此系統(tǒng)是我做的一個簡單的學(xué)生管理系統(tǒng)，由于缺少經(jīng)驗，在建立數(shù)據(jù)庫的時候，考慮的不完善，建立數(shù)據(jù)庫內(nèi)容接觸較少，導(dǎo)致系統(tǒng)功能實現(xiàn)不是那么完美。雖然在不斷的修改，但由于能力和時間的關(guān)系，還是有很多不盡人意的地方，在以后的修改過程中，我將會查更多的資料對系統(tǒng)進行更改，使系統(tǒng)的設(shè)計更加完善?？傊?，通過這次課程設(shè)計,我深刻體會到要做好一個完整的事情，需要有系統(tǒng)的思維方式和方法，對待要解決的問題，要耐心、要善于運用已有的資源來充實自己。同時我也深刻的認識到，在對待一個新事物時，一定要從整體考慮，完成一步之后再作下一步，這樣才能更加有效。參考文獻[1] 龔沛曾，陸慰民，楊志強. Visual Basic實驗指導(dǎo)與測試（第三版）.北京：高等教育出版社，2007[2] 羅朝盛. Visual （第二版）. 北京：人民郵電出版社，2005[3] 羅朝盛. Visual . 北京：人民郵電出版社，2005[4] 羅朝盛， ：浙江科學(xué)技術(shù)出版社，2008[5] 王棟. Visual Basic程序設(shè)計實用教程（第二版）. 北京：清華大學(xué)出版社，2006 19
公司管理相關(guān)推薦
鄂ICP備17016276號-1