徐彬

摘要：图表可以使数据图形化，非常直观地显示数据，使数据之间的对比或趋势一清二楚。它对提高信息价值，更准确地表达信息和观点意义重大。文章以实例探讨了图表在VB中的应用。

中图分类号：TP311 文献标识码：A 文章编号：1009-3044（2016）21-0091-05

1 背景

图表是指在屏幕中显示，可直观展示统计时间、数量等信息属性，对知识挖掘和信息直观生动感受起关键作用的图形结构。或许我们无法轻易记住一连串的数字，以及它们之间的趋势和关系，但是可以很容易地记住一个曲线、一幅图画。图表可以用来表现数据间的某种相对关系，例如，柱形图可以比较数据间的多少关系，用折线图可以分析和比较数据。通过使用图表，可以使数据更加有趣、吸引人、易于阅读和评价，从而更容易表达观点。

2 实现方法

2.1 开发工具介绍

软件开发工具为VB6.0，数据库管理系统为Access 2010。VB是Microsoft公司开发的一种程序设计语言。它采用了面向对象的设计思想、事件驱动的编程机制。它具备强大的数据库访问能力，可以方便地访问Oracle、SQL Server、Access等多种数据库管理系统。Access是一个方便灵活的关系型数据库管理系统，它提供了完整的数据库应用开发工具，适合开发特定的面向数据库的Windows应用程序。

2.2 实现过程

在VB中，单击“工程”菜单下的“部件”，勾选“Microsoft Tabbled Control 6.0（SP6）”，即在工具箱中添加SSTab控件，用作选项卡；勾选“Microsoft Chart Control 6.0（SP4）（OLEDB）”，用于显示图表；同时勾选“Microsoft Hierarchical FlexGrid Control 6.0（OLEDB）”，即在工具箱中添加MSHFlexGrid控件，用以显示查询结果。单击“工程”菜单下的“引用”，勾选“Microsoft ActiveX Data Objects 2.8 Library”，即引用ADO对象。

Access数据库名为“收支管理”，在“收支管理”数据库中有以下几张表结构及基础数据。

“图表类型”下拉列表中可以选择“二维柱形图”、“二维饼图”。“收入情况”选项卡中，单击按“姓名统计”按钮，MSChart控件按姓名能显示出相应类型的图表，MSHFlexGrid控件显示明细，Combo1～Combo2用来保存图例。“按项目统计”根据收入项目显示图表及明细。“支出情况”选项卡同“收入情况”选项卡类似。默认图表类型为二维饼图。

代码如下：

1）建立MdlExecuteSQL模块，主要用来连接数据库和执行查询，代码如下：

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 数组

On Error GoTo executesql_error

Stokens = Split（Sql） 将sql语句按关键字保存在数组中

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 从服务器中提取符合要求的记录集

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 网络安全管理实施对策

2.1 在全网部署硬件防火墙

根据内部网络的需求，在内网和外网之间架设硬件防火墙，隔离外网与内网之间的访问。在防火墙中打开IP和端口控制，设立DMZ区，打开所需的常用网络服务如HTTP、FTP等，这样就可防范外部对内部用户的攻击；及时查看防火墙的日志文件，对防火墙的管理可以指定独立的管理IP。通过对防火墙规则的设置，使用户需要的应用协议才能通过，让内部网络变得更安全。

2.2 利用专用服务器安装网络版杀毒软件

采用网络版杀毒软件，可以对整个内部网络采取全面的病毒防护。现在的网络版杀毒软件有瑞星和江民。他们都能对整个内部网络进行防病毒统一管理，制作一定的防病毒策略，定时对全网系统进行自动查、杀病毒。网络防病毒策略一般包括：升级和修补，及时更新病毒程序包和杀毒软件版本；备份，定时备份所需的重要数据以便在出现故障时进行恢复；安装软件时使用经过确认的软件包；一旦某台机器感染病毒，找到感染源并彻底清除；任何客户端都不能自行卸载杀毒软件，设立卸载密码。

2.3 网络安全漏洞修补

定期采用专用的漏洞扫描软件对内部网络的专用服务器如WWW服务器、视频会议服务器、数据库服务器、FTP服务器等进行漏洞扫描、分析和评估，并生成扫描报告。根据评估的安全风险，及时修补漏洞及下载系统更新补丁，还要对重要数据进行备份，以达到增强网络的安全性的目的。

2.4 用户级访问控制

对所有用户采用专用的用户口令和访问规则及权限，以确保只有合法用户才能访问合法资源。网络管理员应该对不同的设备设置不同的口令，而且设置的口令最好是大小写字母、数字加特殊字符等，最好是8位以上的密码，还需要定期更改密码并将密码记录下来。

2.5 内部网络计算机认证访问

我们都知道，计算机的MAC地址在全球是唯一的，在网络中对所有计算机进行IP地址和MAC地址进行绑定，就能够标识每台计算机的使用人，只有经过绑定的计算机的IP才能够访问网络。这种绑定可以使用具有三层功能的核心交换来做，也可以使用软件在专用服务器上做。利用这种绑定不但可以控制网内用户随意更换IP的问题，还可以很容易找到某些存在问题的计算机。

2.6 网络机房安全管理

网络安全管理不仅仅要从计算机硬件、软件和人员使用上管理到位，而且对机房也要纳入安全管理范围，并建立各种安全管理制度，如机房管理制度、设备管理制度、安全系统管理制度、病毒防范制度、操作安全管理制度、安全事件应急制度、各服务器检查备份制度等，建立相应的各种检查记录文件，定期修订不安全的因素，最终采取切实有效的措施保证制度的执行。

通过以上对各种网络安全技术的分析，我们给出了相应的解决问题的对策，从技术和制度管理上保证了疗养院信息网络安全的运行。我相信，随着网络安全管理人员的进一步学习和实践，并积极参加国内外的各种网络安全培训，必将会进一步提高我们信息网络管理的安全，使网络安全正常的运行。

参考文献：

[1] Anne Carasik-Henmi. 防火墙核心技术精解[M]. 北京： 中国水利水电出版社， 2005：10-14.

[2] 戴浩， 杨林. 端端通信系统安全体系结构[J]. 计算机安全， 2004（2）.

[3] 谭兵， 吴宗文， 黄伟. 网络入侵检测技术综述[J]. 电脑编程技巧与维护， 2010（2）.