[理學(xué)]物業(yè)管理系統(tǒng)數(shù)據(jù)庫課程設(shè)計(jì)-文庫吧資料
2025-01-24 14:35本頁面
【正文】 odc1DataField姓名DataField門牌號(hào)LockedTrueLockedTrueText3DataSourceAdodc1Text6DataSourceAdodc1DataField性別DataField面積LockedTrueLockedTrue控件名屬性名屬性值作用CmdFirstCaption首記錄將指針移動(dòng)到第一條記錄CmdPreCaption前移指針向前移動(dòng)一個(gè)記錄CmdNextCaption后移指針向后移動(dòng)一條記錄CmdLastCaption末記錄指針移動(dòng)到最后一條記錄CmdNCaption移動(dòng)記錄數(shù)一次移動(dòng)n條記錄Text7Text空輸入要移動(dòng)的記錄數(shù)Label7Caption空顯示當(dāng)前記錄數(shù)和記錄總數(shù)業(yè)主信息查詢界面如下（首記錄）：對(duì)應(yīng)的代碼如下：Private Sub CmdAdd_Click() = False = False = False = True = True = False = False = False = False = False = FalseEnd SubPrivate Sub CmdCancel_Click() = True = True = True = False = False = True = True = True = True = True = TrueEnd SubPrivate Sub CmdDel_Click()x = MsgBox(確實(shí)要?jiǎng)h除當(dāng)前記錄嗎？, vbYesNo + vbQuestion, 確認(rèn))If x = vbYes Then If Then End IfElse End IfEnd SubPrivate Sub CmdFirst_Click() 39。單擊取消按鈕Unload MeEnd SubPrivate Sub Form_Load()End Sub 瀏覽界面（1）業(yè)主信息查詢界面如下該界面瀏覽時(shí)支持向前或者向后逐條瀏覽記錄，但是到達(dá)首記錄時(shí)“前移”按鈕失效，到達(dá)末記錄時(shí)“后移”按鈕失效。判斷輸入的用戶名是否已存在： If = False Then MsgBox 用戶名已存在，請(qǐng)重新輸入！, vbExclamation, 檢驗(yàn)用戶名 Text1 = Text2 = : Text3 = Exit Sub End IfEnd If39。 39。 amp。 判斷密碼是否正確 If (密碼) = Text2 Then = True = True = True Unload Me Else MsgBox 密碼錯(cuò)誤，重新輸入 , vbExclamation, 警告 = End IfEnd IfmiCount = miCount + 1If miCount = 3 Then Unload MeEnd SubPrivate Sub Command2_Click()Unload MeEnd Sub（2）注冊(cè)界面的設(shè)計(jì)該界面主要有CommandButton控件添加兩個(gè)按鈕“確認(rèn)”和“取消”，Label控件添加的四個(gè)標(biāo)簽以及TextBox控件添加的三個(gè)輸入?yún)^(qū)，最后由Adodc控件和“密碼表”連接。若沒找到符合Where條件的記錄 MsgBox 用戶名錯(cuò)誤，重新輸入, vbExclamation, 警告 = 39。 39。 amp?？丶傩灾当恚?控件名屬性名屬性值控件名屬性名屬性值Label2Caption用戶名Command1Caption登錄Font宋體、小四Font宋體、小四Label3Caption密碼Command3Caption注冊(cè)Font宋體、小四Font宋體、小四登錄界面如下： 當(dāng)輸入的用戶名不存在或者密碼錯(cuò)誤時(shí)系統(tǒng)會(huì)給出警告： 對(duì)應(yīng)的代碼如下：Dim miCount As Integer 39。在未登錄之前只有登錄菜單可用，成功登錄之后信息管理、信息查詢和系統(tǒng)管理三個(gè)主菜單變?yōu)榭捎玫摹?ER模型管理人員登陸進(jìn)入管理界面YN信息管理系統(tǒng)管理業(yè) 主 信 息業(yè)主編號(hào)姓 名性 別電 話門牌號(hào)面 積業(yè) 主 信 息業(yè)主編號(hào)姓 名性 別電 話門牌號(hào)面 積物業(yè)收費(fèi)信息收費(fèi)編號(hào)收費(fèi)名稱單 價(jià)收費(fèi)說明收取費(fèi)用業(yè)主交費(fèi)信息MN業(yè)主編號(hào)收費(fèi)編號(hào)交費(fèi)日期交費(fèi)金額收款人物業(yè)服務(wù)項(xiàng)目信息項(xiàng)目編號(hào)項(xiàng)目名稱負(fù)責(zé)人服務(wù)業(yè)主接受服務(wù)信息業(yè)主編號(hào)項(xiàng)目編號(hào)服務(wù)費(fèi)用服務(wù)時(shí)間服務(wù)效果MN（1）業(yè)主信息（業(yè)主編號(hào)，姓名，性別，電話，門牌號(hào)，面積）（2）交費(fèi)信息（業(yè)主編號(hào)，收費(fèi)編號(hào)，交費(fèi)日期，交費(fèi)金額，收款人）（3）收費(fèi)信息（收費(fèi)編號(hào)，收費(fèi)名稱，單價(jià)，收費(fèi)說明）（4）服務(wù)信息（業(yè)主編號(hào)，項(xiàng)目編號(hào)，服務(wù)費(fèi)用，服務(wù)時(shí)間，服務(wù)效果）（5）服務(wù)項(xiàng)目（項(xiàng)目編號(hào)，項(xiàng)目名稱，負(fù)責(zé)人）（6）用戶信息（用戶名，密碼）表結(jié)
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1