vb課程設(shè)計(jì)---學(xué)生成績(jī)管理系統(tǒng)

上傳人：奔*** IP屬地：河北更新時(shí)間：2024-03-01 格式：docx 頁數(shù)：17 大?。?92.78KB 人氣指數(shù)：12 舉報(bào) 版權(quán)申訴

vb課程設(shè)計(jì)---學(xué)生成績(jī)管理系統(tǒng)_第1頁

已閱讀1頁，還剩16頁未讀，繼續(xù)免費(fèi)閱讀

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、　　VB語言程序設(shè)計(jì)課程設(shè)計(jì)報(bào)告　　（2011-2012學(xué)年第二學(xué)期）　　學(xué)生成績(jī)管理系統(tǒng)　　一、功能描述　　學(xué)生成績(jī)管理系統(tǒng)是一個(gè)學(xué)校必須需要的，這個(gè)系統(tǒng)對(duì)學(xué)校的管理有著重要

2、的作用。單一的用人工手抄不但麻煩且對(duì)于查詢、更新來講也是很困難的。　　隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí),它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。所以學(xué)生成績(jī)管理系統(tǒng)可以通過計(jì)算機(jī)來實(shí)現(xiàn)，這個(gè)學(xué)生管理系統(tǒng)主要有權(quán)限登錄、編輯、查詢功能。在編輯里可以進(jìn)行添加、修改、刪除等功能。其核心是數(shù)據(jù)庫，系統(tǒng)設(shè)計(jì)以提高數(shù)據(jù)共享程度。很大程度的改善了用人工手工記

3、錄的不足，效率高，查詢準(zhǔn)確。　　二、概要設(shè)計(jì) 　　1、系統(tǒng)功能模塊框圖　　圖1 系統(tǒng)流程圖　　2、數(shù)據(jù)庫設(shè)計(jì)

4、　2.1學(xué)生成績(jī)管理系統(tǒng)數(shù)據(jù)庫設(shè)計(jì)　　由于考慮到本系統(tǒng)的應(yīng)用環(huán)境,只建立起一個(gè)數(shù)據(jù)庫，在此數(shù)據(jù)庫基礎(chǔ)上建立如下三個(gè)基本表：　　學(xué)生表（表（1））：學(xué)號(hào)（idx_）、姓名、性別　　課程表（表（2））：課程號(hào)(idx_)、課程名稱、學(xué)時(shí)、學(xué)分　　成績(jī)表（表（3））：學(xué)號(hào)、

5、姓名、課程號(hào)、成績(jī)　　2.2數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)　　(1)學(xué)生表結(jié)構(gòu)：　　表（1）　　(2)課程表結(jié)構(gòu)：<b&g

6、t;　　表（2）　?。?）成績(jī)表結(jié)構(gòu)　　表（3）　　三、詳細(xì)設(shè)計(jì)　　1.主界面(MDI)　　主

7、界面為一個(gè)MDI窗口，有編輯菜單分別是“登錄、編輯、查詢、退出”當(dāng)程序運(yùn)行時(shí)主界面最先彈出，菜單中“登錄”和“退出”是可用的，只有點(diǎn)擊“登陸”登錄后其余兩個(gè)才可用。這個(gè)窗口還設(shè)置了MDI圖片作為背景。　　窗體截圖（如圖1）　　圖1　　功能

8、實(shí)現(xiàn)（部分代碼）　　Private Sub DL_Click() 　　land.Show　　End Sub　　Private Sub BJ_Click()</p

9、>　　edit.Show　　DL.Enabled = False　　End Sub　　Private Sub CX_Click()　　chaxun.Show</p

10、>　　DL.Enabled = False　　End Sub　　MDIForm1.Show　　CX.Enabled = False　　BJ.Enabled = False<p&

11、gt;　　End Sub　　2.登錄界面（Land）　　登錄界面有兩個(gè)按鈕一個(gè)“確定”一個(gè)“取消”主要是實(shí)現(xiàn)進(jìn)入編輯與查詢界面。在text1中輸入正確的賬號(hào)“2010”輸入正確的密碼“12345”才能進(jìn)入，否則提示“用戶名或密碼錯(cuò)誤”。　?。?）窗體截圖（圖2）</p&

12、gt;　　圖2　　（2）功能實(shí)現(xiàn)（部分代碼）　　Private Sub Command1_Click()　　If Text1.Text = "2010" And Text2.Text = "12345" Then&

13、lt;/p>　　Load land　　MDIForm1.Show　　DIForm1.DL.Enabled = False　　MDIForm1.BJ.Enabled = True　　MDIForm1.CX.E

14、nabled = True　　Unload land　　Else　　MsgBox "用戶名或密碼錯(cuò)誤", 1, "密碼錯(cuò)誤"　　End If</p&g

15、t;　　End Sub　　3.編輯界面（Edit）　　編輯窗體里面有一個(gè)SSTab控件主要實(shí)現(xiàn)3個(gè)信息的轉(zhuǎn)換。有3個(gè)Data控件分別是Dataxues、Datakc、Datacj且分別與數(shù)據(jù)庫里面的學(xué)生表、課程表、成績(jī)表連接。窗體上面的text也相應(yīng)的與數(shù)據(jù)庫里面對(duì)應(yīng)的信息連接從而實(shí)現(xiàn)運(yùn)行是有學(xué)

16、生成績(jī)等信息的顯示。上面還有7個(gè)按鈕對(duì)學(xué)生的信息進(jìn)行修改、添加、刪除等。對(duì)學(xué)生成績(jī)信息的更新起到了關(guān)鍵的作用。　　窗體的截圖（圖3（部分））　　說明：這是未運(yùn)行是的截圖，在運(yùn)行是Dtata控件是不可見的。　　圖3　?。?）功能實(shí)現(xiàn)（部

17、分代碼和部分屬性截圖）　　添加的代碼：　　Private Sub Cmdtj_Click()　　Select Case Cmdtj.Caption　　Case "添加"<

18、/p>　　Select Case SSTab1.Tab　　Case 0　　Dataxues.Recordset.AddNew　　Case 1　　Datakc.Recor

19、dset.AddNew　　Case 2　　Datacj.Recordset.AddNew　　End Select　　SSTab1.TabEnabled(0) = False　　SSTab1.T

20、abEnabled(1) = False　　SSTab1.TabEnabled(2) = False　　Cmdtj.Caption = "確定"　　Cmdxg.Enabled = False　　Cmdsc.Enabled = False</p&g

21、t;　　Cmdsjl.Enabled = False　　Cmdsyt.Enabled = False　　Cmdxyt.Enabled = False　　cmdwjl.Enabled = False　　Case "確定&qu

22、ot;　　Select Case SSTab1.Tab　　Case 0　　Datakc.UpdateRecord　　Case 1　　D

23、atacj.UpdateRecord　　Case 2　　Dataxues.UpdateRecord　　End Select　　SSTab1.TabEnabled(0) = True　　SSTa

24、b1.TabEnabled(1) = True　　SSTab1.TabEnabled(2) = True　　Cmdtj.Caption = "添加"　　Cmdxg.Enabled = True　　Cmdsc.Enabled = True</p&g

25、t;　　Cmdsjl.Enabled = True　　Cmdsyt.Enabled = True　　Cmdxyt.Enabled = True　　cmdwjl.Enabled = True　　End Select<p&g

26、t;　　End Sub　　數(shù)據(jù)庫的連接：　　Private Sub Form_Load()　　If Right(App.Path, 1) = "\" Then　　Dataxue

27、s.DatabaseName = App.Path + "mydb.mdb"　　Else　　Dataxues.DatabaseName = App.Path + "\mydb.mdb"　　End If

28、;　　Dataxues.RecordSource = "學(xué)生表"　　Dataxues.Refresh　　Option1.Value = Dataxues.Recordset.Fields("性別").Value　　Datakc.Da

29、tabaseName = Dataxues.DatabaseName　　Datakc.RecordSource = "課程表"　　Datakc.Refresh　　Textkch.DataField = "課程號(hào)"　　Textkcm.

30、DataField = "課程名稱"　　Textxshi.DataField = "學(xué)時(shí)"　　Textxf.DataField = "學(xué)分"　　Datacj.DatabaseName = Dataxues.DatabaseName

31、　　Datacj.RecordSource = "成績(jī)表"　　Datacj.Refresh　　Textxh2.DataField = "學(xué)號(hào)"　　Textkch2.DataField = "課程號(hào)"<p&g

32、t;　　Textxm2.DataField = "姓名"　　Textcj.DataField = "成績(jī)"　　SSTab1.Tab = 0　　End Sub　　部分屬性截圖：&

33、lt;/b>　　其他Data與Text的屬性類似。　　4.查詢界面（chaxun）　　查詢界面主要實(shí)現(xiàn)學(xué)生系統(tǒng)的信息查詢工作。有按照課程號(hào)和學(xué)號(hào)兩種查詢方式。其中用到了兩個(gè)很關(guān)鍵的控件一個(gè)是DataGrid與Adodc。Adodc控件是與數(shù)據(jù)庫連接信息在DataGrid中顯示。窗體和具體屬性見下圖所示。&l

34、t;/p>　　窗體　　Adodc屬性截圖：　　說明：代碼見源代碼。　　四、調(diào)試中存在的問題及解決方法　　在調(diào)試工程中運(yùn)行編輯這張表時(shí)學(xué)生信息的性別不會(huì)發(fā)生變化

35、　原因的分析：在查詢中執(zhí)行上一條和下一條時(shí)表中的數(shù)據(jù)性別是沒有跟著一起變化的。　　解決辦法：在上一條和下一條的代碼中間加入這樣的代碼　　Private Sub cmdsyt_Click()　　------------------------------------------<p&g

36、t;　　Option1.Value = Dataxues.Recordset.Fields("性別").Value　　If Option1.Value = False Then Option2.Value = True　　------------------------------------------<

37、;p>　　使之和其他數(shù)據(jù)一樣變化下去,最終達(dá)到正常。　　五、心得體會(huì)　　通過為期一星期的vb課程設(shè)計(jì)使我對(duì)vb這門課程在實(shí)際生活中的運(yùn)用有了很深入的了解，感受到數(shù)據(jù)庫的強(qiáng)大功能使現(xiàn)實(shí)的有些工作變得更方便。　　在設(shè)計(jì)過程中，因?yàn)槭谴笠粚W(xué)習(xí)的課程對(duì)有些知識(shí)有些陌生剛開始就覺

38、得這個(gè)設(shè)計(jì)可能難度有些大還有些畏懼。但在老師的提醒回憶中有了希望。在設(shè)計(jì)中遇到過一些困難，要是以前一遇到困難肯定是第一時(shí)間問老師，這次不同這次遇到困難后寫自己找辦法解決除非是正的解決不了了才找老師，在這個(gè)尋知的過程中自己將問題解決了感覺十分舒爽。　　本系統(tǒng)的不足是在用戶登錄的權(quán)限方面有待改進(jìn)，應(yīng)該對(duì)編輯用戶和查詢用戶進(jìn)行權(quán)限，這樣可能會(huì)更好。<b&

39、gt;　　六、參考文獻(xiàn)　　【1】羅朝盛.Visual Basic 6.0程序設(shè)計(jì)教程(第3版) [M]. 人民郵電出版社， 　　2009．2　　【2】邵潔..Visual Basic 6.0程序設(shè)計(jì)（第4版）[M].東南大學(xué)出版社，2009.1<

40、;/p>　　邵潔. Visual Basic 6.0 實(shí)驗(yàn)與測(cè)試（第4版）.東南大學(xué)出版社，2008.2　　七、附錄（源代碼）　　1.主界面（MDI）　　Private Sub DL_Click()<

41、b>　　land.Show　　land.Height = 5500　　land.Width = 7150　　MDIForm1.Height = 6315　　MDIForm1.Width = 8340<

42、;b>　　End Sub　　Private Sub BJ_Click()　　edit.Show　　DL.Enabled = False　　MDIForm1.Height = 6315&

43、lt;p>　　MDIForm1.Width = 8340　　End Sub　　Private Sub CX_Click()　　chaxun.Show　　DL.Enabled = False

44、;　　End Sub　　Private Sub Form_Load()　　MDIForm1.Show　　CX.Enabled = False　　BJ.Enabled = False<b&

45、gt;　　End Sub　　Private Sub MDIForm_Load()　　CX.Enabled = False　　BJ.Enabled = False　　End Sub<p&

46、gt;　　Private Sub TC_Click()　　End　　End Sub　　2.登錄：　　Private Sub Command1_Click()&

47、lt;/p>　　If Text1.Text = "2010" And Text2.Text = "12345" Then　　Load land　　MDIForm1.Show　　MDIForm1.Height

48、= 6315　　MDIForm1.Width = 8340　　MDIForm1.DL.Enabled = False　　MDIForm1.BJ.Enabled = True　　MDIForm1.CX.Enabled = True

49、　Unload land　　Else　　MsgBox "用戶名或密碼錯(cuò)誤", 1, "密碼錯(cuò)誤"　　End If　　End Sub<

50、/b>　　Private Sub Command2_Click()　　End　　End Sub　　3.編輯:&

51、lt;b>　　刪除：　　Private Sub Cmdsc_Click()　　Dim i As Integer　　i = MsgBox("確定要?jiǎng)h除此記錄?", vbYesNo + vbExclamation + vbDefaultButton1, "編輯&

52、quot;)　　If i = vbYes Then　　Select Case SSTab1.Tab　　Case 0　　Dataxues.Recordset.Delete　　Dataxues.R

53、efresh　　Case 1　　Datakc.Recordset.Delete　　Datakc.Refresh　　Case 2　　Datacj.Recor

54、dset.Delete　　Datacj.Refresh　　End Select　　End If　　End Sub　　首記錄：</b

55、>　　Private Sub cmdsjl_Click()　　Select Case SSTab1.Tab　　Case 0　　Dataxues.Recordset.MoveFirst&l

56、t;b>　　Case 1　　Datakc.Recordset.MoveFirst　　Case 2　　Datacj.Recordset.MoveFirst　　End Select<

57、p>　　Cmdsjl.Enabled = False　　Cmdsyt.Enabled = False　　cmdwjl.Enabled = True　　Cmdxyt.Enabled = True　　End Sub

58、;　　下一條：　　Private Sub cmdsyt_Click()　　Select Case SSTab1.Tab　　Case 0　　Dataxues.Recordset

59、.MovePrevious　　Option1.Value = Dataxues.Recordset.Fields("性別").Value　　If Option1.Value = False Then Option2.Value = True　　If Dataxues.Recordset.BOF

60、 Then　　Dataxues.Recordset.MoveFirst　　Cmdsjl.Enabled = False　　Cmdsyt.Enabled = False　　Cmdxyt.Enabled = True　　cmdwjl.

61、Enabled = True　　End If　　Case 1　　Datakc.Recordset.MovePrevious　　If datkc.Recordset.BOF Then</p&g

62、t;　　datkc.Recordset.MoveFirst　　Cmdsjl.Enabled = False　　Cmdsyt.Enabled = False　　Cmdxyt.Enabled = True　　cmdwjl.Enabled = True&l

63、t;/p>　　End If　　Case 2　　Datacj.Recordset.MovePrevious　　If Datacj.Recordset.BOF Then

64、Datacj.Recordset.MoveFirst　　cmdyjl.Enabled = False　　Cmdsyt.Enabled = False　　Cmdxyt.Enabled = True　　cmdwjl.Enabled = True<

65、p>　　End If　　End Select　　End Sub　　添加：　　Private Sub Cmdtj_Click()&

66、lt;p>　　Select Case Cmdtj.Caption　　Case "添加"　　Select Case SSTab1.Tab　　Case 0　　Dataxues

67、.Recordset.AddNew　　Case 1　　Datakc.Recordset.AddNew　　Case 2　　Datacj.Recordset.AddNew<

68、;p>　　End Select　　SSTab1.TabEnabled(0) = False　　SSTab1.TabEnabled(1) = False　　SSTab1.TabEnabled(2) = False　　Cmdtj.Caption = "確定&q

69、uot;　　Cmdxg.Enabled = False　　Cmdsc.Enabled = False　　Cmdsjl.Enabled = False　　Cmdsyt.Enabled = False　　Cmdxyt.Enabled

70、= False　　cmdwjl.Enabled = False　　Case "確定"　　Select Case SSTab1.Tab　　Case 0&l

71、t;p>　　Datakc.UpdateRecord　　Case 1　　Datacj.UpdateRecord　　Case 2　　Dataxues.UpdateRecord

72、　　End Select　　SSTab1.TabEnabled(0) = True　　SSTab1.TabEnabled(1) = True　　SSTab1.TabEnabled(2) = True　　Cmdtj.Caption = "添加

73、"　　Cmdxg.Enabled = True　　Cmdsc.Enabled = True　　Cmdsjl.Enabled = True　　Cmdsyt.Enabled = True　　Cmdxyt.Enabled =

74、True　　cmdwjl.Enabled = True　　End Select　　End Sub　　尾記錄：　　Private Sub cmdwjl_Cl

75、ick()　　Select Case SSTab1.Tab　　Case 0　　Dataxues.Recordset.MoveLast　　Case 1　　D

76、atakc.Recordset.MoveLast　　Case 2　　Datacj.Recordset.MoveLast　　End Select　　Cmdsjl.Enabled = True

77、Cmdsyt.Enabled = True　　cmdwjl.Enabled = False　　Cmdxyt.Enabled = False　　End Sub　　修改：<

78、;p>　　Private Sub Cmdxg_Click()　　Select Case Cmdxg.Caption　　Case "修改"　　Select Case SSTab1.Tab　　C

79、ase 0　　Dataxues.Recordset.edit　　Case 1　　Datakc.Recordset.edit　　Case 2<p&g

80、t;　　Datacj.Recordset.edit　　End Select　　SSTab1.TabEnabled(0) = False　　SSTab1.TabEnabled(1) = False　　SSTab1.TabEnabled(2) = False

81、;　　Cmdxg.Caption = "確定"　　Cmdtj.Enabled = False　　Cmdsc.Enabled = False　　Cmdsjl.Enabled = False　　Cmdsyt.Enabled = Fal

82、se　　Cmdxyt.Enabled = False　　cmdwjl.Enabled = False　　Case "確定"　　Select Case SSTab1.Tab&

83、lt;b>　　Case 0　　Dataxues.UpdateRecord　　Case 1　　Datakc.UpdateRecord　　Case 2

84、　　Datacj.UpdateRecord　　End Select　　SSTab1.TabEnabled(0) = True　　SSTab1.TabEnabled(1) = True　　SSTab1.TabEnabled(2) = True</p&

85、gt;　　Cmdxg.Caption = "修改"　　Cmdtj.Enabled = True　　Cmdsc.Enabled = True　　Cmdsjl.Enabled = True　　Cmdsyt.Enabled = True

86、　　Cmdxyt.Enabled = True　　cmdwjl.Enabled = True　　End Select　　End Sub　　下一條：<

87、/p>　　Private Sub cmdxyt_Click()　　Select Case SSTab1.Tab　　Case 0　　Dataxues.Recordset.MoveNext　　Option1.V

88、alue = Dataxues.Recordset.Fields("性別").Value　　If Option1.Value = False Then Option2.Value = True　　If Dataxues.Recordset.EOF Then　　Dataxues.Recordse

89、t.MoveLast　　Cmdsjl.Enabled = True　　Cmdsyt.Enabled = True　　Cmdxyt.Enabled = False　　cmdwjl.Enabled = False

90、End If　　Case 1　　Datakc.Recordset.MoveNext　　If Datakc.Recordset.EOF Then　　Datakc.Recordset.MoveLast

91、;　　Cmdsjl.Enabled = True　　Cmdsyt.Enabled = True　　Cmdxyt.Enabled = False　　cmdwjl.Enabled = False　　End If<

92、;/p>　　Case 2　　Datacj.Recordset.MoveNext　　If Datacj.Recordset.EOF Then　　Datacj.Recordset.MoveLast　　Cmdsj

93、l.Enabled = True　　Cmdsyt.Enabled = True　　Cmdxyt.Enabled = False　　cmdwjl.Enabled = False　　End If

94、　End Select　　End Sub　　數(shù)據(jù)庫連接：　　Private Sub Form_Load()　　If Right(App.Path, 1) = "\" Then&

95、lt;/p>　　Dataxues.DatabaseName = App.Path + "mydb.mdb"　　Else　　Dataxues.DatabaseName = App.Path + "\mydb.mdb"<p&

96、gt;　　End If　　Dataxues.RecordSource = "學(xué)生表"　　Dataxues.Refresh　　Option1.Value = Dataxues.Recordset.Fields("性別").Value<

97、;/p>　　Datakc.DatabaseName = Dataxues.DatabaseName　　Datakc.RecordSource = "課程表"　　Datakc.Refresh　　Textkch.DataField = "課程號(hào)"&l

98、t;/p>　　Textkcm.DataField = "課程名稱"　　Textxshi.DataField = "學(xué)時(shí)"　　Textxf.DataField = "學(xué)分"　　Datacj.DatabaseName = Data

99、xues.DatabaseName　　Datacj.RecordSource = "成績(jī)表"　　Datacj.Refresh　　Textxh2.DataField = "學(xué)號(hào)"　　Textkch2.DataField = "

100、;課程號(hào)"　　Textxm2.DataField = "姓名"　　Textcj.DataField = "成績(jī)"　　SSTab1.Tab = 0　　End Sub

101、　　4.查詢：　　取消：　　Private Sub Command2_Click()　　Text(0).Text = ""　　Text(1).Text =

102、""　　End Sub　　連接數(shù)據(jù)庫：　　Private Sub Command1_Click()　　Dim sql As String, fld As String, con

103、dition As String　　fld = "學(xué)生表.學(xué)號(hào),學(xué)生表.姓名,課程表.課程號(hào),成績(jī)表.成績(jī),課程表.課程名稱"　　condition = "學(xué)生表.學(xué)號(hào)=成績(jī)表.學(xué)號(hào) and 課程表.課程號(hào)=成績(jī)表.課程號(hào) "　　If Op(0).Value Then<

104、;/p>　　condition = condition + "and 學(xué)生表.學(xué)號(hào)='" + Text(0).Text + "'"　　Text(0).Text = ""　　Else<p

105、>　　condition = condition + "and 課程表.課程號(hào)='" + Text(1).Text + "'"　　Text(1).Text = ""　　End If　　sql =

106、 "select " + fld + " from 學(xué)生表,課程表,成績(jī)表 where " + condition　　Adodc1.RecordSource = sql　　Adodc1.Refresh　　End Sub

107、;　　Private Sub Form_Load()　　Adodc1.Visible = False　　Set DataGrid1.DataSource = Adodc1　　DataGrid1.AllowUpdate = False

108、　　End Sub　　Op與text之間的轉(zhuǎn)換：　　Private Sub Op_Click(Index As Integer)　　Text(Index).SetFocus　　End Sub

眾賞文庫> 全部分類> 畢業(yè)設(shè)計(jì)

溫馨提示

1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 眾賞文庫僅提供信息存儲(chǔ)空間，僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請(qǐng)與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

vb課程設(shè)計(jì)---學(xué)生成績(jī)管理系統(tǒng)

文檔簡(jiǎn)介

溫馨提示

最新文檔

評(píng)論

vb課程設(shè)計(jì)---學(xué)生成績(jī)管理系統(tǒng)

文檔簡(jiǎn)介

溫馨提示

最新文檔

評(píng)論

免費(fèi)下載