圖表在VB中的應用

徐彬

摘要：圖表可以使數(shù)據(jù)圖形化，非常直觀地顯示數(shù)據(jù)，使數(shù)據(jù)之間的對比或趨勢一清二楚。它對提高信息價值，更準確地表達信息和觀點意義重大。文章以實例探討了圖表在VB中的應用。

中圖分類號：TP311 文獻標識碼：A 文章編號：1009-3044（2016）21-0091-05

1 背景

圖表是指在屏幕中顯示，可直觀展示統(tǒng)計時間、數(shù)量等信息屬性，對知識挖掘和信息直觀生動感受起關(guān)鍵作用的圖形結(jié)構(gòu)。或許我們無法輕易記住一連串的數(shù)字，以及它們之間的趨勢和關(guān)系，但是可以很容易地記住一個曲線、一幅圖畫。圖表可以用來表現(xiàn)數(shù)據(jù)間的某種相對關(guān)系，例如，柱形圖可以比較數(shù)據(jù)間的多少關(guān)系，用折線圖可以分析和比較數(shù)據(jù)。通過使用圖表，可以使數(shù)據(jù)更加有趣、吸引人、易于閱讀和評價，從而更容易表達觀點。

2 實現(xiàn)方法

2.1 開發(fā)工具介紹

軟件開發(fā)工具為VB6.0，數(shù)據(jù)庫管理系統(tǒng)為Access 2010。VB是Microsoft公司開發(fā)的一種程序設(shè)計語言。它采用了面向?qū)ο蟮脑O(shè)計思想、事件驅(qū)動的編程機制。它具備強大的數(shù)據(jù)庫訪問能力，可以方便地訪問Oracle、SQL Server、Access等多種數(shù)據(jù)庫管理系統(tǒng)。Access是一個方便靈活的關(guān)系型數(shù)據(jù)庫管理系統(tǒng)，它提供了完整的數(shù)據(jù)庫應用開發(fā)工具，適合開發(fā)特定的面向數(shù)據(jù)庫的Windows應用程序。

2.2 實現(xiàn)過程

在VB中，單擊“工程”菜單下的“部件”，勾選“Microsoft Tabbled Control 6.0（SP6）”，即在工具箱中添加SSTab控件，用作選項卡；勾選“Microsoft Chart Control 6.0（SP4）（OLEDB）”，用于顯示圖表；同時勾選“Microsoft Hierarchical FlexGrid Control 6.0（OLEDB）”，即在工具箱中添加MSHFlexGrid控件，用以顯示查詢結(jié)果。單擊“工程”菜單下的“引用”，勾選“Microsoft ActiveX Data Objects 2.8 Library”，即引用ADO對象。

Access數(shù)據(jù)庫名為“收支管理”，在“收支管理”數(shù)據(jù)庫中有以下幾張表結(jié)構(gòu)及基礎(chǔ)數(shù)據(jù)。

“圖表類型”下拉列表中可以選擇“二維柱形圖”、“二維餅圖”?！笆杖肭闆r”選項卡中，單擊按“姓名統(tǒng)計”按鈕，MSChart控件按姓名能顯示出相應類型的圖表，MSHFlexGrid控件顯示明細，Combo1～Combo2用來保存圖例?！鞍错椖拷y(tǒng)計”根據(jù)收入項目顯示圖表及明細?！爸С銮闆r”選項卡同“收入情況”選項卡類似。默認圖表類型為二維餅圖。

代碼如下：

1）建立MdlExecuteSQL模塊，主要用來連接數(shù)據(jù)庫和執(zhí)行查詢，代碼如下：

Public Str_path As String

Public Function Connectstring（） As String

Str_path = CurDir（） & "＼" & "收支管理.accdb"

Connectstring = "Provider=Microsoft.Jet.OLEDB.4.0；Data Source=" & Str_path & "；Persist Security Info=False"

End Function

Public Function ExeCutesql（ByVal Sql As String， Msgstring As String） As ADODB.Recordset

Dim cnn As New ADODB.Connection

Dim Rst As ADODB.Recordset

Dim Stokens（） As String 數(shù)組

On Error GoTo executesql_error

Stokens = Split（Sql） 將sql語句按關(guān)鍵字保存在數(shù)組中

Set cnn = New ADODB.Connection

cnn.Open Connectstring

If InStr（"INSERT，DELETE，UPDATE"， UCase$（Stokens（0））） <> 0 Then

cnn.Execute Sql

Msgstring = Stokens（0） & "操作成功"

Else

Set Rst = New ADODB.Recordset

Rst.Open Trim$（Sql）， cnn， adOpenKeyset， adLockOptimistic 從服務(wù)器中提取符合要求的記錄集

Set ExeCutesql = Rst

Msgstring = "查詢到" & Rst.RecordCount & "條記錄"

End If

executesql_exit：

Set Rst = Nothing 釋放記錄集

Set cnn = Nothing 釋放連接語句

Exit Function

executesql_error：

Msgstring = "查詢錯誤：" & Err.Description

Resume executesql_exit

End Function

2）“圖表”窗體通用聲明處代碼

Dim Mydb As New ADODB.Recordset

2 網(wǎng)絡(luò)安全管理實施對策

2.1 在全網(wǎng)部署硬件防火墻

根據(jù)內(nèi)部網(wǎng)絡(luò)的需求，在內(nèi)網(wǎng)和外網(wǎng)之間架設(shè)硬件防火墻，隔離外網(wǎng)與內(nèi)網(wǎng)之間的訪問。在防火墻中打開IP和端口控制，設(shè)立DMZ區(qū)，打開所需的常用網(wǎng)絡(luò)服務(wù)如HTTP、FTP等，這樣就可防范外部對內(nèi)部用戶的攻擊；及時查看防火墻的日志文件，對防火墻的管理可以指定獨立的管理IP。通過對防火墻規(guī)則的設(shè)置，使用戶需要的應用協(xié)議才能通過，讓內(nèi)部網(wǎng)絡(luò)變得更安全。

2.2 利用專用服務(wù)器安裝網(wǎng)絡(luò)版殺毒軟件

采用網(wǎng)絡(luò)版殺毒軟件，可以對整個內(nèi)部網(wǎng)絡(luò)采取全面的病毒防護?，F(xiàn)在的網(wǎng)絡(luò)版殺毒軟件有瑞星和江民。他們都能對整個內(nèi)部網(wǎng)絡(luò)進行防病毒統(tǒng)一管理，制作一定的防病毒策略，定時對全網(wǎng)系統(tǒng)進行自動查、殺病毒。網(wǎng)絡(luò)防病毒策略一般包括：升級和修補，及時更新病毒程序包和殺毒軟件版本；備份，定時備份所需的重要數(shù)據(jù)以便在出現(xiàn)故障時進行恢復；安裝軟件時使用經(jīng)過確認的軟件包；一旦某臺機器感染病毒，找到感染源并徹底清除；任何客戶端都不能自行卸載殺毒軟件，設(shè)立卸載密碼。

2.3 網(wǎng)絡(luò)安全漏洞修補

定期采用專用的漏洞掃描軟件對內(nèi)部網(wǎng)絡(luò)的專用服務(wù)器如WWW服務(wù)器、視頻會議服務(wù)器、數(shù)據(jù)庫服務(wù)器、FTP服務(wù)器等進行漏洞掃描、分析和評估，并生成掃描報告。根據(jù)評估的安全風險，及時修補漏洞及下載系統(tǒng)更新補丁，還要對重要數(shù)據(jù)進行備份，以達到增強網(wǎng)絡(luò)的安全性的目的。

2.4 用戶級訪問控制

對所有用戶采用專用的用戶口令和訪問規(guī)則及權(quán)限，以確保只有合法用戶才能訪問合法資源。網(wǎng)絡(luò)管理員應該對不同的設(shè)備設(shè)置不同的口令，而且設(shè)置的口令最好是大小寫字母、數(shù)字加特殊字符等，最好是8位以上的密碼，還需要定期更改密碼并將密碼記錄下來。

2.5 內(nèi)部網(wǎng)絡(luò)計算機認證訪問

我們都知道，計算機的MAC地址在全球是唯一的，在網(wǎng)絡(luò)中對所有計算機進行IP地址和MAC地址進行綁定，就能夠標識每臺計算機的使用人，只有經(jīng)過綁定的計算機的IP才能夠訪問網(wǎng)絡(luò)。這種綁定可以使用具有三層功能的核心交換來做，也可以使用軟件在專用服務(wù)器上做。利用這種綁定不但可以控制網(wǎng)內(nèi)用戶隨意更換IP的問題，還可以很容易找到某些存在問題的計算機。

2.6 網(wǎng)絡(luò)機房安全管理

網(wǎng)絡(luò)安全管理不僅僅要從計算機硬件、軟件和人員使用上管理到位，而且對機房也要納入安全管理范圍，并建立各種安全管理制度，如機房管理制度、設(shè)備管理制度、安全系統(tǒng)管理制度、病毒防范制度、操作安全管理制度、安全事件應急制度、各服務(wù)器檢查備份制度等，建立相應的各種檢查記錄文件，定期修訂不安全的因素，最終采取切實有效的措施保證制度的執(zhí)行。

通過以上對各種網(wǎng)絡(luò)安全技術(shù)的分析，我們給出了相應的解決問題的對策，從技術(shù)和制度管理上保證了療養(yǎng)院信息網(wǎng)絡(luò)安全的運行。我相信，隨著網(wǎng)絡(luò)安全管理人員的進一步學習和實踐，并積極參加國內(nèi)外的各種網(wǎng)絡(luò)安全培訓，必將會進一步提高我們信息網(wǎng)絡(luò)管理的安全，使網(wǎng)絡(luò)安全正常的運行。

參考文獻：

[1] Anne Carasik-Henmi. 防火墻核心技術(shù)精解[M]. 北京： 中國水利水電出版社， 2005：10-14.

[2] 戴浩， 楊林. 端端通信系統(tǒng)安全體系結(jié)構(gòu)[J]. 計算機安全， 2004（2）.

[3] 譚兵， 吳宗文， 黃偉. 網(wǎng)絡(luò)入侵檢測技術(shù)綜述[J]. 電腦編程技巧與維護， 2010（2）.