vb課程設(shè)計(jì)-小區(qū)物業(yè)管理系統(tǒng)(編輯修改稿)
2025-02-11 18:31 本頁面
【文章內(nèi)容簡(jiǎn)介】 2電Single是3氣Single是4物管Single是5時(shí)間Date/Time是6 (5)報(bào)修項(xiàng)目數(shù)據(jù)表。報(bào)修項(xiàng)目數(shù)據(jù)表命名為“報(bào)修數(shù)據(jù)”，“編號(hào)”設(shè)置為自動(dòng)增加，并用于創(chuàng)建索引。索引名為RepairIndex,設(shè)置為唯一的、主要的索引。 表5 報(bào)修項(xiàng)目數(shù)據(jù)表結(jié)構(gòu)字段名稱類型大小字段是否固定允許零長(zhǎng)度必要字段順序位置編號(hào)Long是0內(nèi)容Text50可變否是1時(shí)間Data是2報(bào)修人Text15可變是是3維修否Boolean是4維修人text15可變否是5 沈 陽 大 學(xué)課程設(shè)計(jì)說明書 (6)投訴項(xiàng)目數(shù)據(jù)表。投訴項(xiàng)目數(shù)據(jù)表命名為“投訴數(shù)據(jù)”，“編號(hào)”設(shè)置為自動(dòng)增加，并用于創(chuàng)建索引。索引名為ApealIndex,設(shè)置為唯一的、主要的索引。 表6 投訴項(xiàng)目數(shù)據(jù)表結(jié)構(gòu)字段名稱類型大小字段是否固定允許零長(zhǎng)度必要字段順序位置編號(hào)Text 是0內(nèi)容Text50可變否是1時(shí)間Data是2投訴人Text15可變是是3負(fù)責(zé)人Text15可變否是4 各個(gè)數(shù)據(jù)表創(chuàng)建完成之后，使用創(chuàng)建的數(shù)據(jù)庫“物管數(shù)據(jù)庫．mdb”創(chuàng)建一個(gè)ODBC數(shù)據(jù)源，并命名為“物管數(shù)據(jù)DSN”。啟動(dòng)visual basic,并選擇創(chuàng)建一個(gè)標(biāo)準(zhǔn)EXE工程，在屬性窗口中將工程命名為“小區(qū)物業(yè)管理系統(tǒng)．vbp”。選擇“工程”——“引用”菜單命令，打開“工程引用”對(duì)話框，并選中“Microsoft activex data objects libray ”然后選擇“工程”——“不見”菜單命令打開“工程部件”對(duì)話框，并在“部件”選項(xiàng)卡中選中“Microsoft ado data control ”和“Microsoft datagrid control ”。選擇“工程”——“添加模塊”菜單命令，為工程添加一個(gè)標(biāo)準(zhǔn)模塊，在屬性窗口中將模塊命名為currentuser data ,并在其代碼窗口中輸入下面的語句定義3個(gè)公共變量，分別保存系統(tǒng)當(dāng)前用戶的用戶名、口令和身份：Public CurrentUserName As String 39。保存當(dāng)前用戶用戶名Public CurrentUserPassword As String 39。保存當(dāng)前用戶登錄口令Public CurrentUserStatus As String 39。保存當(dāng)前用戶身份具體操作如下：第一步，創(chuàng)建系統(tǒng)主窗體：為工程添加一個(gè)MDI窗體，將窗體Caption屬性設(shè)置為“紅光苑住宅小區(qū)管理系統(tǒng)”，窗體命名為“frmSysMain”,保存為“ ”為窗體創(chuàng)建如下圖所示的菜單系統(tǒng)： 沈 陽 大 學(xué)課程設(shè)計(jì)說明書 各個(gè)菜單項(xiàng)的標(biāo)題和名稱如表： 表7 系統(tǒng)菜單標(biāo)題和名稱標(biāo)題名稱標(biāo)題名稱文件Mnufile住戶信息Mnuuserinf退出Mnuexit編輯Mnuedituser
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1