高校圖書管理系統(tǒng)(編輯修改稿)
2025-05-04 22:33 本頁面
【文章內(nèi)容簡(jiǎn)介】 鍵。第三步，實(shí)現(xiàn)系統(tǒng)登陸功能，具體方法如下。（1） 定義窗體級(jí)變量。在窗體代碼通用聲明部分定義保存允許用戶驗(yàn)證登陸信息最大次數(shù)的窗體級(jí)變量，語句如所示：Const MaxLog Times As Interger3 （2） 實(shí)現(xiàn)登陸身份驗(yàn)證。在用戶輸入用戶名和口令之后，單擊確定按鈕提交登陸信息，在按鈕的單擊事件中完成所有驗(yàn)證操作，實(shí)現(xiàn)代碼如下：（3） 實(shí)現(xiàn)退出功能。單擊取消按鈕，退出登陸程序，實(shí)現(xiàn)代碼如下：6 實(shí)現(xiàn)系統(tǒng)用戶管理 系統(tǒng)用戶管理包括用戶數(shù)據(jù)的添加、修改和瀏覽等操作。下面仍然使用前面創(chuàng)建的 SysUers 數(shù)據(jù)環(huán)境命令，即使用 訪問”系統(tǒng)用戶”數(shù)據(jù)表。第一步，創(chuàng)建用戶管理窗體，具體方法如下。高級(jí)管理員使用的用戶管理窗體如圖所示。控件 屬性 屬性設(shè)置BorderSryle 1Fixed Single控件Command1 屬性Caption屬性設(shè)置添加Forml Label1 Label2 Label3 Caption NameAutoSizeCaption AutoSizeCaption AutoSizeCaption NameText系統(tǒng)用服管理SysUserManageTrue編號(hào)True口令True權(quán)限txtNum（清空）Command2 Command3 Command4 Command5 Command6NameCaptionNameCaption NameCaption NameCaption NameNameCmdAdd刪除cmdDelete刷新cmdRefresh保存cmdSave關(guān)閉cmdExitcmdMoveText1DataSourceDataMbenberDataField NameTextLibrary_Manage Command7SysUsers Command8編號(hào) Command9txtPWD（清空）NameNameNameNameDataSourcecmdMovecmdMovecmdMovetxtAuthLibrary_ManageText2DataSourceLibrary_ManageText3DataMbenberSysUsersDataMbenber SysUsersDataField權(quán)限PictureBox DataField NameBorderStyle口令picNacvgationNoneText4TextNameText（清空）txtNews（清空）其中 PictureBox、CommandCommandCommandCommand9 和 txtNews 組成一個(gè)自定義的記錄導(dǎo)航條，各命令 Style 屬性設(shè)置為 1，Picture 屬性分別設(shè)置為表示移動(dòng)到第一個(gè)記錄、移動(dòng)到上一記錄、移動(dòng)到下一記錄、移動(dòng)到最后記錄的位圖。在后面的多個(gè)模塊總會(huì)使用相同的導(dǎo)航條。第二步，實(shí)現(xiàn)系統(tǒng)用戶管理功能，具體方法如下。（1）定義窗體級(jí)變量。定義一個(gè)窗體級(jí)變量用于標(biāo)示是否處于添加記錄狀態(tài)，當(dāng)窗體處于添加記錄狀態(tài)時(shí)，必需完成保存操作之后才能執(zhí)行其它管理操作，定義語句如下：Dim is Adding As Boolean （2） 實(shí)現(xiàn)窗體初始化。在窗體加載時(shí)，窗體中默認(rèn)顯示“系統(tǒng)用戶”數(shù)據(jù)表中的第一個(gè)記錄數(shù)據(jù)，為了使 txtNews 文本框顯示當(dāng)前記錄編號(hào)和記錄總數(shù)，在窗體加載時(shí)執(zhí)行按鈕的單擊事件過程，實(shí)現(xiàn)代碼如下：Private Sub Form_Load()cmdMove(0).Value=True End Sub（3）實(shí)現(xiàn)記錄導(dǎo)航。為實(shí)現(xiàn)記錄導(dǎo)航，本例中使用了PicrureBox 控件、命令按鈕和文本框模擬實(shí)現(xiàn)了 ADO Data 控件的導(dǎo)航條，該導(dǎo)航條具有瀏覽記錄、顯示當(dāng)前記錄編號(hào)和記錄總數(shù)的功能。（4） 驗(yàn)證用戶信息輸入。在輸入編號(hào)、口令和級(jí)別代碼是，執(zhí)行驗(yàn)證操作。（5） 實(shí)現(xiàn)添加操作。在用戶單擊添加按鈕是，想“系統(tǒng)用戶”數(shù)據(jù)表中添加一條新記錄。（6） 實(shí)現(xiàn)刪除操作。（7） 實(shí)現(xiàn)刷新操作。（8） 實(shí)現(xiàn)保存操作。（9） 實(shí)現(xiàn)關(guān)閉操作第三步，實(shí)現(xiàn)普通管理員口令修改功能，具體方法如下。（1） 創(chuàng)建普通管理員口令修改窗體。普通管理員口令修改窗體如圖所示：（2） 實(shí)現(xiàn)窗體初始化。（3） 實(shí)現(xiàn)口令輸入驗(yàn)證。（4） 實(shí)現(xiàn)口令保存。（5） 實(shí)現(xiàn)窗體關(guān)閉操作。實(shí)現(xiàn)讀者數(shù)據(jù)管理讀者數(shù)據(jù)管理包括讀者類別和個(gè)人數(shù)據(jù)管理，分別需要訪問“讀者類別”和“讀者數(shù)據(jù)”數(shù)據(jù)表。第一步，創(chuàng)建數(shù)據(jù)環(huán)境命令，具體方法如下。打開數(shù)據(jù)環(huán)境設(shè)計(jì)器，在 Libray_Manage_Con 連接中添加兩個(gè)命令。將第一個(gè)命令命將第 二 個(gè) 命令命 名 為“ ReaderData ”,Comman
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1