【正文】 tion, 錯誤 Else MsgBox 無此用戶！請先注冊?? , vbOKOnly + vbInformation, 錯誤 End If End If VB 課程設(shè)計論文 9 End Sub 系統(tǒng)員管理界面設(shè)計 如圖 42。 數(shù)據(jù)庫的設(shè)計 VB 課程設(shè)計論文 6 表 31。所以，它具有很好的伸縮性，能夠滿足從桌面應(yīng)用到大型企業(yè)分布式應(yīng)用到不同層次用戶的要求。SQL Server 提供了 TransactSQL、 DBLibrary for C、嵌入式 SQL（ ESQL）等開發(fā)工具， TransactSQL 與工業(yè)標(biāo)準(zhǔn) SQL 語言兼容，并在其基礎(chǔ)上加以擴(kuò)充，使它更適合事務(wù)處理方面的需要。即使 SQL Server 數(shù)據(jù)庫管理員不做任何設(shè)置，SQL Server 也能夠在運(yùn)行過程 中根據(jù)環(huán)境配置和用戶訪問情況動態(tài)自動配置，以達(dá)到最優(yōu)性能，從而減輕管理員工作。 （ 1） 豐富的圖形管理工具，使系統(tǒng)管理、操作更為直觀方便。利用 VISUAL BASIC 程序設(shè)計語言，可以很方便地設(shè)計出在 WINDOWS 環(huán)境下運(yùn)行的應(yīng)用程序。需輸入用戶名、密碼、確認(rèn)密碼、和其他條件進(jìn)行注冊。 用戶查詢窗體 ：實現(xiàn) 用戶對系統(tǒng)的已錄入信息進(jìn)行查詢 。而對于后者則要求應(yīng)用程序功能完備 ,易使用等特點 。 VB 課程設(shè)計論文 2 第 2 章 需求分析 隨著高校規(guī)模的不斷擴(kuò)大，學(xué)生數(shù)量急劇增加，有關(guān)學(xué)生的各種信息量也成倍增長，龐大學(xué)生信息的管理工作成了高校教學(xué)管理工作中的一項重要任務(wù)，一方面，假如遵從以往舊式的工作方式，該工作的工作量大，管理繁瑣，既耗人力，又耗物力；另一方面，由于計算機(jī)技術(shù)的飛速發(fā)展及應(yīng)用的普及，學(xué)生信息管理這樣煩瑣的工作更需要由計算機(jī)來完成。具有對學(xué)生的基本信息和成績信息進(jìn)行統(tǒng)計的 功能。 界面設(shè)計要求盡量友好、美觀，應(yīng)提供登錄界面 .對各種信息應(yīng)提供錄入、修改、刪除和查詢功能。能夠按用戶的要求生成學(xué)生信息報表和成績信息報表。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。 系統(tǒng)員管理窗體 ： 實現(xiàn)對注冊新同學(xué)的信息和已錄入信息的查找、修改和刪除。 用戶注冊窗體 ： 實現(xiàn)新用戶的注冊。 Visual Basic 提供了大量的控件，這些控件可用于設(shè)計界面和實現(xiàn)各種功能，減少了編程人員的工作量，也簡化了界面設(shè)計過程，從而有效的提高了應(yīng)用程序的運(yùn)行效率和可靠性。 利用 Visual Basic 語言編程有以下幾個特點： Server 數(shù)據(jù)庫特點 概括起來， SQL Server 2020 數(shù)據(jù)庫管理系統(tǒng)具有以下主要特點。 （ 2） 動態(tài)自動管理和優(yōu)化功能。 （ 4） 豐富的編程接口工具，使用戶開發(fā) SQL Server 數(shù)據(jù)庫應(yīng)用程序更加靈活。 SQL Server 2020 既能運(yùn)行在 Windows 桌面操作系統(tǒng)下， 又可運(yùn)行在服務(wù)器操作系統(tǒng)（包括 Windows NT 和 Windows 2020）下；既能運(yùn)行在單 CPU 計算機(jī)上，又能運(yùn)行在對稱多處理系統(tǒng)下。此外，與 Windows 2020 的集成還使 SQL Server 能夠充分利用操作系統(tǒng)所提供的服務(wù)和功能（如安全管理、事件日志、性能監(jiān)視器、內(nèi)存管理和異步 I/O 等），從而增強(qiáng)了 SQL Server 數(shù)據(jù)庫系統(tǒng)的功能，并且只需要占用很少的系統(tǒng)資源。 UserTable UserID UserName pwd RealName Age Unit RegisterTime UserType State 119 admin 1 21 2020/10/30 22:24:00 2 1 124 th 1 th 21 1 2020/1/7 23:21:19 0 1 125 pang 2 pang 21 管 1 2020/1/8 10:50:53 0 1 表 33用戶登 錄表 VB 課程設(shè)計論文 8 第 4 章 詳細(xì)設(shè)計 登錄界面 設(shè)計 如圖 41。判斷有無 Where 語句 Dim bwhere As Boolean sqlstr = select * from studenttable wherestr = bwhere = False If Then wherestr = wherestr + Studentname=39。 bwhere = True End If If = 1 And Then If bwhere Then wherestr = wherestr + and wherestr = wherestr + Studentid like 39。 VB 課程設(shè)計論文 10 bwhere = True End If If = 1 And Then If bwhere Then wherestr = wherestr + and wherestr = wherestr + studentname like 39。 bwhere = True End If If = 1 And Then If bwhere Then wherestr = wherestr + and wherestr = wherestr + class like 39。 bwhere = True End If If = 1 Then If bwhere Then wherestr = wherestr + and If = 0 Then wherestr = wherestr + gender like 39。 ElseIf = 1 Then wherestr = wherestr + gender like 39。 End If bwhere = True End If If = 1 And Then If = Then = 00 If bwhere Then wherestr = wherestr + and If Then wherestr = wherestr + acceptancetime39。 Else wherestr = wherestr + acceptancetime39。 End If