【文章內(nèi)容簡(jiǎn)介】 構(gòu)分析圖 業(yè)務(wù)流程分析（畫(huà)出業(yè)務(wù)流程圖） 業(yè)務(wù)員 客戶信息查詢 客戶信息管理 客戶信息輸出 系統(tǒng)管理 添加新客戶 修改客戶資料 客戶資料匯總 系統(tǒng)功能添加 系統(tǒng)整理 進(jìn)行銷售及售后服務(wù) 圖 業(yè)務(wù)流程圖 數(shù)據(jù)流程分析 添加新客戶 客戶管理數(shù)據(jù)庫(kù) 刪除客戶 客戶信息編輯 客戶信息查詢 修改信息 進(jìn)行服務(wù) 不合格 信息添加 顧客需求 P1 查詢信息 業(yè)務(wù)部 工作人員 P2 添加客戶 P4 業(yè)務(wù)取消 P3 交易談判 P5 業(yè)務(wù)進(jìn)行 P6 財(cái)務(wù)處理 顧客信息 D1 數(shù)據(jù)庫(kù)系 統(tǒng) 基本信息 數(shù)據(jù)回復(fù) 交易記錄 準(zhǔn)備交易 客戶信 息 客戶編號(hào) 交易 會(huì)員編號(hào) 數(shù)據(jù)流程圖 數(shù)據(jù)字典 編號(hào)為數(shù)字 姓名 為文本 性別 為文本 購(gòu)買(mǎi) 日期 為文本 電話位數(shù)字 Email為文本 地址 為文本 備注為文本 3 系統(tǒng)設(shè)計(jì) 新系統(tǒng)功能結(jié)構(gòu)設(shè)計(jì) 圖 新系統(tǒng)功能結(jié)構(gòu)圖 處理流程設(shè)計(jì) 進(jìn)行售后服務(wù) 會(huì)員信息輸出 客戶信息添加 客戶 管理系統(tǒng) 登陸 客戶 信息管理 客戶信息刪除 客戶信息修改 按編號(hào)查詢 客戶 信息查詢 圖 處理流程圖 代碼設(shè)計(jì) 編號(hào)為數(shù)字串 年月日和當(dāng)天的編號(hào) 例 07050632為 07年 5月 6日第 32個(gè)客戶 數(shù)據(jù)庫(kù)設(shè)計(jì) 客戶數(shù)據(jù)庫(kù) 受理客戶咨詢及查詢 登錄系統(tǒng) 查詢信息輸出生成售后單 技術(shù)人員持單進(jìn)行上門(mén)售后 對(duì)售后內(nèi)容在單據(jù)上進(jìn)行登記 對(duì)新用戶進(jìn)行登記 密碼管理 表： 字段名稱 數(shù)據(jù)類型 字段大小 ID 自動(dòng)編號(hào) 長(zhǎng)整型 用戶名 文本 255 密碼 文本 255 輸入輸出設(shè)計(jì) 系統(tǒng)物理配置方案設(shè)計(jì) CPU P3 800Hz或同頻率 AMD 以上 內(nèi)存： 128M 硬盤(pán)容量 10G以上 操作系統(tǒng) win98及以上操作系統(tǒng) 4 系統(tǒng)實(shí)施 開(kāi)發(fā)環(huán)境 本系統(tǒng)一般的主流計(jì)算機(jī)即可運(yùn)行 內(nèi)存容量要求低 128M 即可 應(yīng)配備的外部設(shè)備 打印機(jī) 軟件環(huán)境 win98 及以上操作系統(tǒng) 。 本系統(tǒng)的設(shè)計(jì)采用語(yǔ)言： Micrsoft Visual Basic 軟件， Microsoft Office Access2020 軟件 系統(tǒng)實(shí)現(xiàn) ： 登錄按鈕代碼： Private Sub aaa_Click() If = Then MsgBox 用戶名不可以為空 , , 提示 tf = False End If If = Then MsgBox 密碼不可以為空 , , 提示 End If = adCmdText = select * from 密碼管理 where 用戶名 =39。 amp。 amp。 39。 = 20 If ( Or ) Then MsgBox 用戶名不存在 , , 出錯(cuò)啦 = = Else If (密碼 ) = Trim() Then Unload Me Else MsgBox 密碼錯(cuò)誤 , , 出錯(cuò) = End If End If End Sub 窗體代碼： Private Sub Form_Load() = Provider=。Data Source= + + \。Persist Security Info=False End Sub 離開(kāi)按鈕代碼： Private Sub cmdCancel_Click() Unload Me End Sub 4. 2． 2 主窗體模塊： 客戶管理按鈕代碼： Private Sub Command1_Click() End Sub 客戶信息輸入按鈕代碼： Private Sub Command2_Click() End Sub 退出按鈕代碼： Private Sub Command3_Click() Unload Me End Sub 關(guān)于按鈕代碼： Private Sub Command4_Click() End Sub 系統(tǒng)管理按鈕代碼： Private Sub Command5_Click() End Sub 客戶信息查詢按鈕代碼：： Private Sub zhuce_Click() End Sub 4. 2． 3會(huì)員信息管理模塊： 保存按鈕代碼： Private Sub baocun_Click() = True = True = True = True = False = True = True = False = False = False = False = False = False = False = False = False End Sub 編輯按鈕代碼： Private Sub Command1_Click() = True = True = True = True = True = True = True = True = True = False = False = False = False = False = False (編號(hào) ).Value = (姓名 ).Value = (性別 ).Value = (購(gòu)買(mǎi)日期 ).Value = (電話 ).Value = (Email).Value = (地址 ).Value = (備注 ).Value = End Sub 返回按鈕代碼： Private Sub Command2_Click() Unload Me End Sub 刪除按鈕代碼： Private Sub Command3_Click() If ( Or ) Then MsgBox 已經(jīng)無(wú)紀(jì)錄 , , 提示 End If End Sub 添加按鈕代碼： Private Sub Command8_Click() = = = = = = = = = True = True = True = True = True = True = True = True = True = False = False = False = False = False = False End Sub 窗體代碼： Private Sub Form_Load() = Provider=。Data Source= + + \。Persist Security Info=False = adCmdText = select * from message Set = Adodc1 = 編號(hào) Set = Adodc1 = 姓名 Set = Adodc1 = 性別 Set = Adodc1 = 購(gòu)買(mǎi)日期 Set = Adodc1 = 電話 Set = Adodc1 = Email Set = Adodc1 = 地址 Set = Adodc1 = 備注 = False = False = False = False = False = False = False = False = False ： Private Sub sjl_Click() End Sub 上一條按鈕代碼： Private Sub up_Click() If Then End If End Sub 4. 2． 4會(huì)員信息查詢模塊： 查詢按鈕代碼： Private Sub Command1_Click() = adCmdText = select * from message where 編號(hào) = 39。 amp。 amp。 39。 = SQL End Sub 返回按鈕代碼： Private Sub Command2_Click(Index As Integer) End Sub 添加按鈕代碼： Private Sub Command3_Click() End Sub 查看記錄按鈕代碼： Private Sub Command4_Click() End Sub 窗體代 碼： Private Sub Form_Load() = Provider=。Data Source= + + \。Persist Security Info=False End Sub 4. 2． 5會(huì)員信息輸出模塊： 添加按鈕代碼： Private Sub Command1_Click() End Sub 查詢按鈕代碼： Private Sub Command2_Click() End Sub 返回按鈕代碼： Private Sub Command3_Click() Unload Me End Sub 刷新按鈕代碼： Private Sub Command4_Click() End Sub 窗體代碼： Private Sub Form_Load() = Provider=。Data Source= + + \。Persist Security Info=False = adCmdText = select 編號(hào) ,姓名 ,性別 ,購(gòu)買(mǎi) 日期 ,電話 ,Email ,地址 ,備注 from message Set = Adodc1 End Sub 5 系統(tǒng)使用說(shuō)明書(shū) 本客 戶管理軟件操作簡(jiǎn)單，界 面簡(jiǎn)明，即使沒(méi)有計(jì)算機(jī)基礎(chǔ)也可操作。 打開(kāi)程序 登陸后進(jìn)入主操作界面： 點(diǎn)擊“客戶信息管理”進(jìn)行客戶信息添加或修改 點(diǎn)擊“客戶信息查詢”按鈕進(jìn)行查詢 點(diǎn)擊“客戶信息輸出”進(jìn)行查詢的輸出 點(diǎn)擊退出可退出客戶信息管理系統(tǒng) 6 結(jié)束語(yǔ) 通過(guò)這次學(xué)習(xí)，我學(xué)到了一個(gè)完整的數(shù)據(jù)庫(kù)管理系統(tǒng)的制作方法，隨著信息技術(shù)的進(jìn)一步發(fā)展，越來(lái)越多的信息管理系統(tǒng)會(huì)應(yīng)用到我們的工作中，因此建立一個(gè)智能高效的信息系統(tǒng)將會(huì)起到效率事半功倍的效果。 在這次系統(tǒng)開(kāi)發(fā)的過(guò)程中我也發(fā)現(xiàn)了自己的很多不足，在系統(tǒng)開(kāi)發(fā)的初期沒(méi)有做好 充分的準(zhǔn)備，造成后期開(kāi)發(fā)過(guò)程中 顯的十分倉(cāng)促， 還要去修改前期的工作。 制作過(guò)程中得到老師很多指點(diǎn)才得以完成，在此衷心感謝老師的幫助 !有不足之處還請(qǐng)老師指點(diǎn)。管理信息系統(tǒng)開(kāi)發(fā)的學(xué)習(xí)在我們未來(lái)的工作中一定會(huì)起到很大的作用。 畢業(yè)設(shè)計(jì)（論文） 課程設(shè)計(jì)題目 客戶管理系統(tǒng)