ＶＢ中基于ＯＬＥ的图形功能的实现.docVIP

ＶＢ中基于ＯＬＥ的图形功能的实现 　　摘要：介绍了一种Visual Basic中通过在OLE容器中嵌入Excel图形的方法来实现图形功能的方法，利用了Excel强大的图形功能，为我们实现Visual Basic中的图形功能提供了新的思路。 　　关键词：Visual Basic；OLE；Excel；图形 　　中图分类号：TP312文献标识码：A文章编号：1009-3044(2008)34-2043-02 　　Realization of Multiple Operating Systems and Virtual Network Based on VMware 　　HUANG Zhi 　　(Mianyang Normal University, Mianyang 621000, China) 　　Abstract: A method of realizing graphics function with Excel graphics embedded in OLE container in Visual Basic is introduced. Great graphics function of Excel is used and a new idea of realizing graphics in Visual Basic is provided. 　　Key words: Visual Basic; OLE; Excel; graphics 　　 　　1 引言 　　某信息系统用于数据的分析和预测、预警，该系统使用VB6.0开发，数据库采用SQLServer2000。为了更加直观的反映各种数据，提出了图形功能的要求，即根据数据库中的数据，作出条形图、曲线图、饼图等图形，使各种数据一目了然。 　　VB具有Shape、Image、MSChart等图形控件，但是这些控件都存在着功能不完善、图形不美观等缺点，因此最终选择了在OLE容器中嵌入Excel图形的方法来实现图形功能。 　　2 主要工具及技术介绍 　　2.1 Visual Basic 　　Visual Basic是Microsoft开发的可视化工作室（Visual Studio）中的重要成员，由早期的Basic语言逐步演变而来。它一方面继承了早期Basic语言简单易用的特点，另一方面引入了面向对象的编程机制，形成所见即所得的可视化程序设计方法，从而大大简化了Windows应用程序的设计。 　　2.2 OLE 　　OLE（Object Linking and Embedding，对象链接与嵌入）是Windows提供的一种信息共享或交换方式，在办公自动化等软件中已经广泛应用，在多媒体软件开发中应用这一技术可使VB利用其他应用程序来制作多媒体数据，然后将它们“链接”或“嵌入”到VB的数据文件中直接使用。 　　为便于利用OLE的功能，VB提供了一种称为OLE容器的控件，这种控件允许将其他媒体工具制作的多媒体对象添加到VB应用程序的窗体中，从而使VB应用程序可方便的显示和编辑其他Windows应用程序中的数据。一旦VB激活了OLE控件，控件就会指向产生这些数据的应用程序，并且借助该应用程序的力量修改这些数据。[1] 　　2.3 Excel 　　Excel是一种电子表格软件，是MSOffice系列办公软件的成员之一，可以用来制作电子表格、完成数据运算，并且具有强大的图形功能，提供了11种类型的图表，其中又含有73种图表子类型，完全可以满足该系统对图形功能的需求。 　　3 图形功能实现方法 　　该信息系统的图形处理功能可以实现条形图、曲线图和饼图的功能。每一种图形对应VB程序中的一个OLE容器。实现图形功能的步骤如下： 　　1) 系统创建Excel临时文件； 　　2) 系统从数据库中读出数据，并将这些数据填入Excel临时文件中； 　　3) 根据填入的数据，在Excel文件中产生图形； 　　4) 把Excel文件中的图形链接到系统的OLE容器中，并显示出来，实现图形功能。 　　3.1 创建临时文件 　　为了创建Excel临时文件，需要创建相关的对象并设置相关参数。部分代码如下。 　　…… 　　Set xApp = New Excel.Application 　　xApp.AlertBeforeOverwriting = False 　　Set xBook = xApp.Workbooks.Add 　　xBook.ShowConflictHistory = False 　　Set xSheet = xBook.Worksheets(1) 　　…… 　　3.2 读出数据并填入到临时文件 　　通过VB的数据连接控件连接到