freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

學(xué)生公寓管理系統(tǒng)(doc畢業(yè)設(shè)計(jì)論文)(編輯修改稿)

2024-08-23 07:57 本頁(yè)面
 

【文章內(nèi)容簡(jiǎn)介】 sgBox(你真的想刪除公寓名稱(chēng)為 amp。 amp。 的記錄嗎?, vbOKCancel, 系統(tǒng)提示)) = vbOK Then End If = Set = Adodc1③寢室設(shè)置效果圖如圖46所示。圖46 寢室設(shè)置④寢室界面制作與實(shí)現(xiàn)方法此界面實(shí)現(xiàn)相對(duì)比公寓設(shè)置來(lái)說(shuō)相對(duì)復(fù)雜一些。用到的控件主要是Sstab與Treeview。在添加一個(gè)寢室前先要選擇所要添加寢室所在的公寓。這個(gè)公寓可以點(diǎn)擊下面的樹(shù)中的節(jié)點(diǎn),也可以在列表框中選擇。樹(shù)中的節(jié)點(diǎn)在點(diǎn)擊后會(huì)把父節(jié)點(diǎn)顯示在選擇公寓后面的列表框中,而選中的節(jié)點(diǎn)會(huì)出現(xiàn)在寢室名稱(chēng)里。你也可以自己進(jìn)行添寫(xiě),確認(rèn)公寓后即可添加完成了。添加后會(huì)把Treeview重新刷新一下。以顯示更新后的記錄。修改操作可以把當(dāng)前選中的寢室進(jìn)行名稱(chēng)修改與其所屬公寓進(jìn)行修改。當(dāng)要對(duì)名稱(chēng)進(jìn)行修改時(shí),先要選擇所要修改的寢室名,選擇后會(huì)在寢室名稱(chēng)里顯示出來(lái),把當(dāng)前寢室名稱(chēng)改成要修改的寢室名稱(chēng),然后點(diǎn)擊修改即完成名稱(chēng)修改操作。當(dāng)要對(duì)當(dāng)前寢室的所屬公寓進(jìn)行修改時(shí),需要先選擇所要修改的寢室,然后在上面的公寓名稱(chēng)后填寫(xiě)所要修改的寢室名稱(chēng)。點(diǎn)擊修改后完成此操作。但是這種操作不是常見(jiàn)。刪除操作可以刪除掉當(dāng)前樹(shù)型顯示中的任何一個(gè)子節(jié)點(diǎn),也就是這個(gè)樹(shù)型節(jié)點(diǎn)中的寢室名稱(chēng),注意的是,刪除后這個(gè)記錄只在qinshi表中刪除,其相關(guān)記錄不會(huì)被刪除掉的,如果想刪除,還需要人工操作。實(shí)現(xiàn)的方法主要是對(duì)qinshi表操作,先對(duì)其進(jìn)行查詢(xún),查詢(xún)當(dāng)前想要被刪除的表是否存在,如果不存在,則給出提示,如果存在這條記錄,則在表中把它刪除掉,刪除后調(diào)用生成樹(shù)過(guò)程,把當(dāng)前寢室設(shè)置中的樹(shù)型結(jié)構(gòu)重新生成,更新記錄。⑤班級(jí)設(shè)置效果圖如圖47所示。圖47班級(jí)設(shè)置⑥界面制作與實(shí)現(xiàn)方法此界面制作與公寓設(shè)置基本一致。在這個(gè)界面中主要用到了一個(gè)Sstab控件與一個(gè)顯示表中內(nèi)容的Datagrid控件。以及起到美觀作用的Frame控件。在右下角的文本框中可以輸入想要添加的班級(jí)名稱(chēng)。然后點(diǎn)擊添加即可完成添加操作。Datagrid中會(huì)立即刷新顯示更新內(nèi)容。要修改某條記錄時(shí),要先對(duì)所要修改的記錄進(jìn)行選擇,確認(rèn)選擇后,點(diǎn)擊下面的修改按鈕,會(huì)在下面的文本中顯示出所要修改班級(jí)的名稱(chēng),此時(shí)即可輸入要修改的名字。然后點(diǎn)擊更新就會(huì)完成此操作。Datagrid也會(huì)即時(shí)更新其內(nèi)容。刪除操作更為簡(jiǎn)單,選擇想要?jiǎng)h除的班級(jí)名稱(chēng),點(diǎn)擊刪除,確認(rèn)后完成此操作。數(shù)據(jù)備份是一個(gè)數(shù)據(jù)庫(kù)軟件必不可少的一部分,利用它可以把當(dāng)前數(shù)據(jù)庫(kù)表進(jìn)行全面的備份,以備以后使用。因?yàn)樵诓僮髦锌赡軙?huì)導(dǎo)致數(shù)據(jù)遭到破壞,或者是系統(tǒng)的原因使數(shù)據(jù)庫(kù)損壞,或者是一些其它的人為原因,這樣你可以用此功能把數(shù)據(jù)恢復(fù)到最后一次備份的狀態(tài),使損失做到最少,經(jīng)常備份,操作起來(lái)更有安全感。①數(shù)據(jù)備份效果圖如圖48所示。圖48 數(shù)據(jù)備份效果圖②功能實(shí)現(xiàn) 界面制作相對(duì)程序來(lái)說(shuō)比較簡(jiǎn)單,用到的是coolbar控件,點(diǎn)擊按鈕可以選擇備份路徑。然后點(diǎn)擊數(shù)據(jù)備份即可。數(shù)據(jù)備份部分在本程序中用到了一個(gè)模塊,在模塊中有一個(gè)方法,dobackup。點(diǎn)擊備份按鈕后開(kāi)始備份,代碼如下:If txtDestination ThenDoBackup PathName, txtDestinationMsgBox 備份成功!, , 提示ElseIf txtDestination = ThenMsgBox You must specify a distination for the backup, vbCritical其中DoBackup為模塊中已定義的方法,在這里進(jìn)行調(diào)用。數(shù)據(jù)恢復(fù)界面同上,它的功能主要是在當(dāng)前數(shù)據(jù)庫(kù)遭到破壞后,可以利用它來(lái)進(jìn)行數(shù)據(jù)恢復(fù),在數(shù)據(jù)恢復(fù)前要選擇所要恢復(fù)的數(shù)據(jù)庫(kù)路徑。數(shù)據(jù)恢復(fù)也用到了一個(gè)方法,在模塊中也已經(jīng)定義了該方法DoRestore。說(shuō)明:本程序中此部分內(nèi)容參考了網(wǎng)上的同類(lèi)型代碼,對(duì)其進(jìn)行修改后得到此成型作品,從功能上來(lái)講,它已經(jīng)實(shí)現(xiàn)了它所要完成的工作,經(jīng)過(guò)測(cè)試已經(jīng)沒(méi)有問(wèn)題,但是實(shí)現(xiàn)的源代碼,也只有部分掌握。這實(shí)屬本人精力與能力有限所置。 數(shù)據(jù)轉(zhuǎn)換這個(gè)功能可以把當(dāng)前列表框中的任何一個(gè)表轉(zhuǎn)換成excel形式,轉(zhuǎn)換后你可以看到表中的內(nèi)容,也可以對(duì)表進(jìn)行操作,保存,修改,打印等。①界面效果圖如圖49所示。圖49 數(shù)據(jù)轉(zhuǎn)換效果圖②實(shí)現(xiàn)方法在這里用到了一個(gè)顯示gif圖片的控件。選擇左面list中的一個(gè)表后,點(diǎn)擊導(dǎo)出后即可完成,進(jìn)度條中顯示當(dāng)前轉(zhuǎn)換進(jìn)度程度。首先要在list中加載各表名。以便進(jìn)行選擇轉(zhuǎn)換。添加表名部分在load進(jìn)行加載,其中的導(dǎo)出與取消按鈕是由coolbar制作而成。數(shù)據(jù)轉(zhuǎn)換成excel用到了一個(gè)部件,在引用中用到了Microsoft Object library。轉(zhuǎn)換代碼如附錄C。學(xué)生請(qǐng)假與違規(guī)在一個(gè)公寓管理中是最常見(jiàn)的問(wèn)題了,所以在此軟件中加上了這兩項(xiàng)功能。用它們可以隨時(shí)記錄請(qǐng)假記錄。①學(xué)生請(qǐng)假記錄圖片顯示如圖410所示。圖410學(xué)生請(qǐng)假效果圖②界面制作與實(shí)現(xiàn) 此界面主要是對(duì)學(xué)生請(qǐng)假記錄做一個(gè)添加。利用它可以把學(xué)生的基本的請(qǐng)假資料保存起來(lái)。其中的日期是系統(tǒng)當(dāng)前的日期,它是不可以進(jìn)行更改的,然后在其它文本框中輸入其它詳細(xì)資料即可以。這里的添加操作用的是Adodc控件,所有的文本框在初始的時(shí)候沒(méi)有同Adodc綁定,而是在代碼中與數(shù)據(jù)庫(kù)中表的字段進(jìn)行的綁定,然后進(jìn)行添加操作。這樣做在使用的時(shí)候有很大的方便之處。第一是窗體在初始化時(shí)不會(huì)顯示任何記錄,不用設(shè)置文本框?yàn)榭盏纫幌盗械牟僮?。第二是?dāng)進(jìn)行記錄輸入時(shí),發(fā)現(xiàn)問(wèn)題不用輸入時(shí),不按添加按鈕記錄就不會(huì)進(jìn)行添加。注意的是,在添加前要確定所有的文本框都要進(jìn)行詳細(xì)填寫(xiě),否則會(huì)提示輸入詳細(xì)信息。添加主要代碼如下:If = Or = Or = Or = Or = Or = Or = Or = Or = ThenMsgBox 請(qǐng)輸入詳細(xì)信息!, , 系統(tǒng)提示ElseWith Adodc1..(0).Value = .(1).Value = .(2).Value = .(3).Value = .(4).Value = .(5).Value = .(6).Value = .(7).Value = .(8).Value = .End WithSet = Adodc1End If①學(xué)生違規(guī)記錄圖片顯示如圖411所示。圖411學(xué)生違規(guī)效果圖此界面與上面的請(qǐng)假記錄差不多。它主要是對(duì)學(xué)生的違規(guī)記錄做一個(gè)添加。其中的日期也是系統(tǒng)當(dāng)前的日期,它是不可以進(jìn)行更改的,然后在其它文本框中輸入其它詳細(xì)資料即可以這里的違規(guī)操作用的也是Adodc控件,所有的文本框在初始的時(shí)候也沒(méi)有同Adodc綁定,它也是在代碼中與數(shù)據(jù)庫(kù)中表的字段進(jìn)行的綁定,然后進(jìn)行添加操作。其它操作同上面基本是一致的,對(duì)于違規(guī)在主界面的左側(cè)并沒(méi)有快速顯示操作,只可以用記錄查看里面的違規(guī)查看進(jìn)行選擇查看。在這里所添寫(xiě)的記錄也要全面一些,主要是為了以后查找更為方便,如果不全,系統(tǒng)會(huì)提示的!公寓衛(wèi)生可以說(shuō)是一個(gè)公寓管理中最常見(jiàn)到的問(wèn)題了。公寓衛(wèi)生每天要清掃,寢室衛(wèi)生每天要檢查,但是如果這些都用紙來(lái)進(jìn)行填寫(xiě),一定會(huì)十分麻煩,且保存也不是十分方便,在一些評(píng)比中也會(huì)忙的很遭。所以在這個(gè)軟件中編寫(xiě)了此功能。 公寓衛(wèi)生添加效果圖公寓衛(wèi)生添加效果圖如圖412所示。圖412 公寓衛(wèi)生添加效果圖①在這個(gè)界面中主要用到了文本框以及起到美觀作用的frame控件。日期已經(jīng)設(shè)置成只讀屬性,檢查記錄的日期是不能隨便改寫(xiě)的。公寓名稱(chēng)可以在下拉列表框中進(jìn)行選擇,如果在下拉列表框中沒(méi)有發(fā)現(xiàn),可以人工輸入,但是要確定公寓名稱(chēng)的正確性。寢室名稱(chēng)需要自己輸入。這里的衛(wèi)生標(biāo)準(zhǔn)一共有五項(xiàng)可以填寫(xiě),在每一項(xiàng)里已經(jīng)基本設(shè)置了所不全標(biāo)準(zhǔn)的記錄,你可以在下拉列表框中進(jìn)行選擇即可,但是如果沒(méi)有你想輸入的記錄的話,你也可以自己輸入。輸入完成后,在減分后面的文本框中輸入一共要對(duì)此寢室減掉的分?jǐn)?shù),單擊得分后面的文本框會(huì)自動(dòng)算出應(yīng)該得到的分?jǐn)?shù)。然后跟據(jù)得分的分?jǐn)?shù),你要選擇該寢室的衛(wèi)生等級(jí),衛(wèi)生等級(jí)為必選值且為固定值,正確的選擇此項(xiàng)可以在主界面的左側(cè)中快速對(duì)衛(wèi)生等級(jí)進(jìn)行查看。②公寓選擇欄中代碼的實(shí)現(xiàn):Dim I As IntegerI = 1If 0 ThenDo While I ((公寓名稱(chēng)))I = I + 1LoopEnd If衛(wèi)生選擇欄中的代碼實(shí)現(xiàn)基本同上,它也是一個(gè)表中的字段值!由于此窗體中涉及到公寓與寢室,在填寫(xiě)時(shí)要確定其名稱(chēng)的正確,所以在添加記錄前要對(duì)它們進(jìn)行檢查,如發(fā)現(xiàn)不存在的記錄,則顯示提示。檢查記錄時(shí)用的是adodc中的find命令。類(lèi)似于用戶(hù)登錄時(shí)的判斷,同樣記錄的輸入也要詳細(xì)。確認(rèn)一切無(wú)誤后,開(kāi)始對(duì)所填寫(xiě)記錄進(jìn)行添加并顯示:With Adodc2..(0).Value = .(1).Value = .(2).Value = .(3).Value = .(4).Value = .(5).Value = .(6).Value = .(7).Value = .(8).Value = .(9).Value = .(10).Value = .(11).Value = .End WithSet = Adodc2 公寓資產(chǎn) 公寓資產(chǎn)可以及時(shí)對(duì)公寓里進(jìn)出財(cái)務(wù)進(jìn)行統(tǒng)計(jì),以免遺忘,造成不必要的損失或不必要的麻煩,它的實(shí)現(xiàn)方法基本同上面的衛(wèi)生記錄的添加,相對(duì)比來(lái)說(shuō)比上面的簡(jiǎn)單一些。不足的是目前只做出了入庫(kù)管理,對(duì)于出庫(kù)記錄還沒(méi)有實(shí)現(xiàn)。圖413 公寓資產(chǎn)添加效果圖日期的設(shè)置同上面一樣,只讀屬性。公寓名稱(chēng)與寢室名稱(chēng)要人工輸入,沒(méi)有選擇,這是因?yàn)榭紤]到它不會(huì)像衛(wèi)生記錄那樣每天要添加一次,每次要添加很多,所以為了減少系統(tǒng)進(jìn)程,它沒(méi)有使用bo,沒(méi)有在窗體中進(jìn)行加載。窗體中的數(shù)量與單價(jià)在填寫(xiě)之后會(huì)自動(dòng)把總價(jià)格計(jì)算出來(lái),類(lèi)似于上圖中的得分一樣。部分代碼如下:If = “” Or = “” Or = “” Then MsgBox “請(qǐng)輸入詳細(xì)信息!”, , “提示”ElseWith Adodc1..(0).Value = .(1).Value = .(2).Value = .(3).Value = .(4).Value = .(5).Value = .(6).Value = .(7).Value = .End WithSet = Adodc1 = “” = “” = “” = “” = “” = “”End If記錄查看可以讓你對(duì)已錄入的記錄進(jìn)行各種符合條件的查找,顯示符合條件的記錄。這里主要包括四個(gè)方面的查看:衛(wèi)生查看、請(qǐng)假查看、違規(guī)查看、資產(chǎn)查看。下面分別介紹。 衛(wèi)生查看①界面效果圖如圖414所示。圖414 衛(wèi)生查看效果圖②界面制作與實(shí)現(xiàn)方法這是一個(gè)比較簡(jiǎn)單的窗體操作。看起來(lái)精簡(jiǎn)、小巧。它主要的功能是對(duì)已經(jīng)錄入的衛(wèi)生記錄進(jìn)行符合條件的查詢(xún)。在查詢(xún)類(lèi)別中選擇可以選擇全部查看以及按日期查看。查看全部即顯示所有記錄,選擇按日期查看后在下面的列表框中選擇所要查看的日期,點(diǎn)擊確定后即可以看到該日期的記錄。在進(jìn)行查詢(xún)前,要對(duì)所操作的表進(jìn)行綁定,日期后面的下拉列表框中可以顯示出所有已經(jīng)錄入記錄的日期,它是通過(guò)對(duì)當(dāng)前表進(jìn)行分類(lèi)查詢(xún)后得到的結(jié)果,然后將其添加在bo中,查看全部,即把當(dāng)前表中的記錄全部賦給當(dāng)前用來(lái)顯示的表格,按日期查看,則是在表中先進(jìn)行查詢(xún),然后對(duì)結(jié)果進(jìn)行重綁定,再賦值。它們的判斷主要是通過(guò)單選框的選取來(lái)完成的,實(shí)現(xiàn)方法如下:s = If = True ThenSet = Adodc1ElseIf = True Thensql = select * from weisheng where 日期=39。 amp。 Trim(s) amp。 39。With Adodc3.Mode = adModeReadWrite.ConnectionString = provider amp。 。 amp。 datasource.CommandType = adCmdText.RecordSource = sql.RefreshEnd WithSet = Adodc3End IfUnload Me在記錄查看中還有其它三項(xiàng)查看方式,分別是請(qǐng)假、違規(guī)、資產(chǎn)三項(xiàng)記錄查看。它們的實(shí)現(xiàn)方法與窗體與上面的衛(wèi)生查看基本相同。刪除是一個(gè)數(shù)據(jù)庫(kù)軟件中最基本的操作之一。在本軟件的工具欄中也有一個(gè)刪除按鈕,其功能也是將所找到的記錄刪除,但是它每次只能刪除一條記錄,且此刪除記錄的前提是在右側(cè)的顯示中容易找出,即記錄不多的情況下使用。如果一旦數(shù)據(jù)記錄很多,一條條查找比較不方便時(shí),即可以使用此窗體進(jìn)行刪除。這里的刪除也有四個(gè)窗體,分別為衛(wèi)生刪除、請(qǐng)假刪除、違規(guī)刪除、資產(chǎn)刪除。下面分別介紹。 衛(wèi)生刪除①效果圖如圖415所示。圖415 衛(wèi)生刪除效果圖②界面制作與實(shí)現(xiàn)方法 這個(gè)界面總體來(lái)說(shuō)各個(gè)控件比較簡(jiǎn)單,但是作為一個(gè)刪除操作,它已經(jīng)連接到了數(shù)據(jù)庫(kù),與數(shù)據(jù)庫(kù)的表相聯(lián)。且有三種刪除記錄方式可以選擇。默認(rèn)為單條刪除,選擇此項(xiàng)后需要在日期中選擇所刪除記錄的添加日期,以及所在的公寓與寢室,當(dāng)這三條全部符合要求后,在表中進(jìn)行查找,找到后確認(rèn)刪除。選擇批量刪除后,在下面只有一個(gè)日期可以選擇,這樣將會(huì)把所選日期內(nèi)的所有記錄都將刪除掉,所以稱(chēng)其為批量刪除。全部即是把當(dāng)前表清空,全部刪除掉,建議使用此操作前對(duì)當(dāng)前數(shù)據(jù)庫(kù)進(jìn)行備份處理,否則數(shù)據(jù)將不會(huì)恢復(fù)。首先要進(jìn)行數(shù)據(jù)庫(kù)連接,接下來(lái)要對(duì)本窗體中的日期進(jìn)行加載,在單條刪除前要確定所有條件符合要求,單條刪除操作的代碼主要部分如
點(diǎn)擊復(fù)制文檔內(nèi)容
環(huán)評(píng)公示相關(guān)推薦
文庫(kù)吧 www.dybbs8.com
備案圖片鄂ICP備17016276號(hào)-1