vb學(xué)生成績(jī)管理系統(tǒng).doc

vb學(xué)生成績(jī)管理系統(tǒng).doc

ID:50977883

大?。?76.50 KB

頁數(shù):21頁

時(shí)間:2020-03-16

vb學(xué)生成績(jī)管理系統(tǒng).doc_第1頁
vb學(xué)生成績(jī)管理系統(tǒng).doc_第2頁
vb學(xué)生成績(jī)管理系統(tǒng).doc_第3頁
vb學(xué)生成績(jī)管理系統(tǒng).doc_第4頁
vb學(xué)生成績(jī)管理系統(tǒng).doc_第5頁
資源描述:

《vb學(xué)生成績(jī)管理系統(tǒng).doc》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。

1、Vb+sql學(xué)生成績(jī)管理系統(tǒng)一、實(shí)驗(yàn)?zāi)康?.綜合掌握實(shí)驗(yàn)一到實(shí)驗(yàn)六的內(nèi)容。2.掌握編程語言與數(shù)據(jù)庫連接及訪問表記錄的方法。二、實(shí)驗(yàn)準(zhǔn)備1.綜合以前所學(xué)知識(shí),結(jié)合某種編程語言開發(fā)完整的系統(tǒng);2.預(yù)習(xí)數(shù)據(jù)庫與編程語言鏈接的相關(guān)內(nèi)容;四、系統(tǒng)功能流程圖查詢刪除修改添加查詢刪除修改添加成績(jī)信息管理課程信息管理學(xué)生成績(jī)管理系統(tǒng)刪除修改添加刪除修改添加用戶登錄學(xué)生成績(jī)管理系統(tǒng)班級(jí)信息管理學(xué)生信息管理五、實(shí)驗(yàn)內(nèi)容及步驟Sql建表:createtablestudent(student_IDchar(4)NOTNULL,student_Namechar(10)NOTNULL,student_Se

2、xchar(2)NULL,born_DatedatetimeNULL,class_NOchar(10)NULL,tele_Numberchar(10)NULL,ru_DatedatetimeNULL,addressvarchar(50)NULL,commentvarchar(200)NULL)createtableresult(exam_Nochar(10)NOTNULL,student_IDchar(4)NOTNULL,student_Namechar(10)NULL,class_Nochar(10)NULL,course_Namechar(10)NULL,resultflo

3、atNULL)createtablecourse(course_Nochar(10)NOTNULL,course_Namechar(10)NULL,course_Typechar(10)NULL,course_Deschar(50)NULL)createtableclass(class_Nochar(10)NOTNULL,gradechar(10)NULL,directorchar(10)NULL,classroom_Nochar(10)NULL)六、Vb開發(fā)歡迎界面歡迎界面設(shè)計(jì)思想:以動(dòng)畫形式開始整個(gè)程序設(shè)計(jì)代碼:OptionExplicitDimProba,Proba2As

4、IntegerDimBoja2AsStringPrivateFunctionZrak(slikaAsPictureBox,StartXAsInteger,StartYAsInteger,LevoAsInteger,DesnoAsInteger,BojaAsString)Me.ScaleMode=vbPixelsWithslika.ScaleMode=vbPixels.AutoRedraw=TrueEndWithForProba2=0Toslika.ScaleWidthDoEventsForProba=0Toslika.ScaleHeightBoja2=slika.Point(P

5、roba2,Proba)Line(StartX,StartY)-(Levo+Proba2,Desno+Proba),Boja2NextLine(StartX,StartY)-(Levo+Proba2,Desno+slika.ScaleHeight),BojaNextForProba2=0Toslika.ScaleHeightLine(StartX,StartY)-(Levo+slika.ScaleWidth,Desno+Proba2),BojaNextEndFunctionPrivateSubForm_Activate()Timer1.Enabled=TrueEndSubPri

6、vateSubForm_Click()UnloadMefrmLogin.ShowTimer1.Enabled=FalseEndSubPrivateSubPicture1_Click()EndSubPrivateSubTimer1_Timer()Dimi,jAsIntegerZrakPicture1,565,295,0,0,Me.BackColorIfTimer1.Interval=1000ThenFori=0To100Forj=0To100DoEventsNextNextEndIfCallForm_ClickEndSub登陸界面登陸界面設(shè)計(jì)思想:輸入用戶名和密碼進(jìn)入學(xué)生成績(jī)管理

7、系統(tǒng)設(shè)計(jì)代碼:OptionExplicitPublicLoginSucceededAsBooleanPrivateSubcmdCancel_Click()'設(shè)置全局變量為false'不提示失敗的登錄LoginSucceeded=FalseMe.HideEndSubPrivateSubcmdOK_Click()'檢查正確的密碼IftxtPassword="0"Then'將代碼放在這里傳遞'成功到calling函數(shù)'設(shè)置全局變量時(shí)最容易的LoginSucceeded=TrueUnloadMeFo

當(dāng)前文檔最多預(yù)覽五頁,下載文檔查看全文

此文檔下載收益歸作者所有

當(dāng)前文檔最多預(yù)覽五頁,下載文檔查看全文
溫馨提示:
1. 部分包含數(shù)學(xué)公式或PPT動(dòng)畫的文件,查看預(yù)覽時(shí)可能會(huì)顯示錯(cuò)亂或異常,文件下載后無此問題,請(qǐng)放心下載。
2. 本文檔由用戶上傳,版權(quán)歸屬用戶,天天文庫負(fù)責(zé)整理代發(fā)布。如果您對(duì)本文檔版權(quán)有爭(zhēng)議請(qǐng)及時(shí)聯(lián)系客服。
3. 下載前請(qǐng)仔細(xì)閱讀文檔內(nèi)容,確認(rèn)文檔內(nèi)容符合您的需求后進(jìn)行下載,若出現(xiàn)內(nèi)容與標(biāo)題不符可向本站投訴處理。
4. 下載文檔時(shí)可能由于網(wǎng)絡(luò)波動(dòng)等原因無法下載或下載錯(cuò)誤,付費(fèi)完成后未能成功下載的用戶請(qǐng)聯(lián)系客服處理。