【導(dǎo)讀】業(yè)務(wù)管理和分析系統(tǒng)，以便安全高效地開展信用卡的各項(xiàng)業(yè)務(wù)。進(jìn)行分析，然后導(dǎo)出圖形、報(bào)表與結(jié)論。更著重介紹了對“風(fēng)險(xiǎn)控制”模塊的設(shè)。度，并與之保持長期的和有益的業(yè)務(wù)關(guān)系。功能，給卡戶和商戶提供友好的操作、查詢、分析等界面。

　　

【正文】 合分析 ： 文字分析（考慮用 data report 來輸出 卡戶和商戶的綜合分析的 報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） d. 各種類型商戶的卡類交易量 ： 各種類型 商戶的卡類交易量分析 ： 文字分析（考慮用 data report 來輸出 各種類型商戶的卡類交易量的 報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） e. 各種類型商戶中卡戶交易的年齡層次 ： 各種類型商戶中卡戶交易的年齡層次分析 ： 文字分析（考慮用 data report 來輸出 各種類型商戶中卡戶交易的年齡層次的 報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） 4. 風(fēng)險(xiǎn)控制分析： a. 透支總量的對比分析： 透支總量的對比分析 ： 文字分析（考慮用 data report 來輸出 透支總量的對比分析 報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） b. 透支持卡人的特征分析： 不同 婚姻狀況 透支持卡人的分析： 文字分析（考慮用 data report 來輸出 不同婚姻狀況 透支持卡人 情況報(bào)表） 圖形分析（考慮用 mschart 輸出 圖形） 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 22 不同 性別持卡人 分析： 文字分析（考慮用 data report 來輸出不同性別持卡人 的情況報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） 不同 教育程度 透支持卡人的分析： 文字分析（考慮用 data report 來輸出不同教育程度 持卡人 的情況報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） c. 透支金額的年齡層次分析： 不同年齡層次透支金額 的分析： 文字分析（考慮用 data report 來輸出 不同年齡層次透支金額 的情況報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） d. 凍結(jié) /止付 /掛失卡的比例： 凍結(jié) /止付 /掛失卡的比例對比 的分析： 文字分析（考慮用 data report 來輸出 凍結(jié) /止付 /掛失卡的比例對比 的情況報(bào)表） 圖形分析（考慮用 mschart 輸出圖形） e. 持卡人、擔(dān)保人的信用評估： 持卡人的信用 分析： 根據(jù) 信用評分表中規(guī)定的評分標(biāo)準(zhǔn)來給出持卡人的信用分?jǐn)?shù)及等級 擔(dān)保人的信用 分析： 根據(jù) 信用評分表中規(guī)定的評分標(biāo)準(zhǔn)來給出擔(dān)保人的信用分?jǐn)?shù)及等級 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 23 第 4 章 系統(tǒng)實(shí)現(xiàn) 系統(tǒng)流程圖： 啟動(dòng) 判斷登陸 主畫面 選擇 程序結(jié)束 風(fēng)險(xiǎn)控制 客戶關(guān)系分析 退出 退出 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 24 風(fēng)險(xiǎn)控制 持卡人、擔(dān)保人的信用評估 凍結(jié) /止付 /掛失卡的比例 透支持卡人年齡層次分析 透支持卡人 特征分析 透支總量 對比分析 透支總量 對比分析 圖形分析 選擇 數(shù)據(jù)報(bào)表 選擇 透支持卡人 特征分析 退出 …… …… …… …… …… …… …… 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 25 圖形分析 選擇 數(shù)據(jù)報(bào)表 透支持卡人年齡層次分析 圖形分析 選擇 數(shù)據(jù)報(bào)表 凍結(jié) /止付 /掛失卡的比例 圖形分析 選擇 數(shù)據(jù)報(bào)表 持卡人、擔(dān)保人信用評估 退出 退出 退出 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 26 圖 程序總的流程圖 ： 1． 描述： 用戶登陸信用卡數(shù)據(jù)分析系統(tǒng)，必須填寫有效的登陸號 、姓名、登陸身份（登陸號 必須為數(shù)字型）。 2．界面：見圖 ~ 圖 登陸號為非數(shù)字型報(bào)錯(cuò)圖 圖 未填姓名報(bào)錯(cuò)圖 持卡人信用評估 選擇 擔(dān)保人信用評估 退出 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 27 圖 未填登陸號報(bào)錯(cuò)圖 圖 未選擇登陸身份報(bào)錯(cuò)圖 3. 部分代碼： Private Sub log_cmd_Click() If text_id = Then ‘檢查登陸號是否為空 MsgBox 登陸號不可以為空 End If If Not IsNumeric(text_id) Then ‘檢查登陸號是否為數(shù)字型 MsgBox 登陸號必須是數(shù)字型的，請重試 = End If If IsNumeric(text_id) Then text_id_temp = End If If text_name = Then MsgBox 姓名不可以為空 Else text_name_temp = text_name End If If ( True) And (Opt_card_owner True) Then MsgBox 請選擇登陸者身份 End If If = True Then opt_shop_temp = True End If If = True Then Opt_card_owner_temp = True End If If (text_id ) And (text_name ) And (( = True) Or (Opt_card_owner = True)) Then End If End Sub ： 1. 描述： 主界面是用來讓登陸用戶選擇想進(jìn)行的操作：客戶關(guān)系分析、風(fēng)險(xiǎn)控制分析，同時(shí)還在主界面顯示登陸者的登陸信息和登陸時(shí)間。 2. 界面：見圖 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 28 圖 分析系統(tǒng)主界面圖 ： 1. 描述： 風(fēng)險(xiǎn)控制界面是用來顯示讓登陸用戶選擇想進(jìn)行具體的操作：透支持卡人的特征分析、透支持卡人的年齡層次分析、透支總量的對比分析、凍結(jié) /止付 /掛失卡的比例、持卡人和擔(dān)保人信用評估，當(dāng)用戶選擇了想要進(jìn)行的操作，便轉(zhuǎn)到相應(yīng)的功能界面。 2. 界面：見圖 圖 風(fēng)險(xiǎn)控制主界面圖 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 29 ： 透支持卡人特征分析主畫面的實(shí)現(xiàn) 1. 描述： 透支持卡人的特性主要包括性別、教育程度、婚姻狀況。本模塊主要提供根據(jù)用戶選擇不同的查詢條件在 DATAGRID 顯示不同的查詢結(jié)果（這主要事通過綁定 DATAGRID 到 ADO 控件，通過改變 ADO 的 COMMANDTYPE 和 RECORDSOURCE 屬性來改變查詢的條件，從而得出不同的查詢結(jié)果）。同時(shí)還允許用戶根據(jù)不同的查詢條件來定義輸出何種對比分析圖、輸出分析報(bào)表。 2. 界面：見圖 圖 持卡人特征分析主畫面圖 3． 部分代碼： Private Sub Form_Load() 男 ‘定義 性別組合框中的可選擇項(xiàng) 女 本科 ‘定義教育程度組合框中的可選擇項(xiàng) 碩士 大專 中專 東華大學(xué)通信工程系 2020 年學(xué)士畢業(yè)論文 30 技校 其他 已婚 ‘定義婚姻狀況組合 框中的可選擇項(xiàng) 未婚 = Now Private Sub Command1_Click() On Error Resume Next Dim sql As String Dim cond1 As String Dim cond2 As String Dim cond3 As String 39。If 1 Then 39。cond1 = 39。End If If = 女 Then ‘按組合框的的選擇得出與所定義的數(shù)據(jù)庫表象匹配的 cond1 = f 查詢條件 ElseIf = 男 Then cond1 = m End If If ( 1) And ( 其他 ) Then cond2 = End If 39。If 1 Then 39。cond3 = 39。End If If = 已婚 Then cond3 = t End If If = 未婚 Then cond3 = f End If 39。sql = SELECT Gender, Marry_status, CustomerID, Name, Education fROM WHERE (Gender = 39。 amp。 cond1 amp。 39。) AND (Education = 39。 amp。 cond2 amp。 39。) AND (Marry_status = 39。 amp。 cond3 amp。 39。) = adCmdText = SELECT Gender, Marry_status, CustomerID, Name, Education fROM WHERE (Gender = 39。 amp。 cond1 amp。 39。) AND (Education = 39。 amp。 cond2 amp。 39。) AND (Marry_status = 39。 amp。 cond3 amp。 39。) 39。轉(zhuǎn)換 adodc 的 mandtype 屬性到 adcmdtext 39。再根據(jù)用戶選擇的條件設(shè)置 adodc 的 recordsource屬性 End Sub Private Sub adodc1_moveplete(ByVal adReason As , ByVal