求助

解决方案 »

  1.   

    ChartSpace 对象
                                    
     代表图表工作区。图表工作区是顶层的图表容器;它可以包含多个图表,而每个图表都由一个 WCChart 对象代表。首次创建图表工作区时,图表工作区将为空(不包含任何图表)。使用 WCCharts 对象的 Add 方法可新建图表。使用 ChartSpace 对象可以使用 CreateObject 方法或 New 关键字新建 ChartSpace 对象。HTML 页或 Visual Basic 窗体中图表控件的对象标识符会返回一个 ChartSpace 对象。ChartSpace 对象的程序标识符为 CLSID:0002E500-0000-0000-C000-000000000046。下例在 HTML 页上创建一个名为“ChartSpace1”的图表工作区。<object id=ChartSpace1 classid=CLSID:0002E500-0000-0000-C000-000000000046 style="width:100%;height:350"></object>
    Add 方法(WCCharts 集合)
                    创建新的空图表。返回 WCChart 对象。语法expression.Add(Index)expression   一个返回 WCCharts 对象的表达式。Index   可选。Long 类型。指定新图表的位置。如果指定为零 (0),则会将图表插入到集合的开始位置。如果不指定此参数,则新图表会插入到集合的末尾。
    Add 方法(WCCharts 集合)示例本示例将图表添加到图表工作区中。Set cht = ChartSpace1.Charts.Add
    BeginUndo 方法
                    指定撤消块的起始位置。这意味着,位于此调用和与此调用相对应的 EndUndo 方法调用之间的所有语句都可以通过调用 Undo 方法撤消。这样,就可以将整个宏合并为一条语句,而用户可以很容易地将其撤消。撤消块可以嵌套。语法expression.BeginUndoexpression   一个返回 ChartSpace 或 Spreadsheet 对象的表达式。
    BeginUndo 方法示例本示例创建含有代码的撤消块,这些代码用于设置活动单元格的数字格式和字体。Spreadsheet1.EnableUndo = True
    Spreadsheet1.BeginUndo
        Set ac = Spreadsheet1.ActiveCell
        ac.NumberFormat = "0.###"
        ac.Font.Color = "blue"
        ac.Font.Name = "times new roman"
    Spreadsheet1.EndUndo
    Clear 方法
                    ChartSpace 对象:删除图表工作区中的每个图表,并将所有格式都重新设置为默认值。删除 WCDataSources 集合中的每个数据源。Range 对象:删除指定区域中的所有格式和数据。语法expression.Clearexpression   一个返回 ChartSpace 或 Range 对象的表达式。
    Clear 方法示例本示例删除指定图表工作区中的所有图表。ChartSpace1.Clear
      

  2.   

    EndUndo 方法
                    指定撤消块的末尾位置。这意味着,位于此调用和与其相对应的 BeginUndo 方法调用之间的所有语句都可以通过调用 Undo 方法撤消。这样,就可以将整个宏都合并到一条语句中,而用户也可以很容易地撤消这些语句。撤消块可以嵌套。语法expression.EndUndoexpression   一个返回 ChartSpace 或 Spreadsheet 对象的表达式。
    EndUndo 方法示例本示例创建含有代码的撤消块,这些代码用于设置活动单元格的数字格式和字体。Spreadsheet1.EnableUndo = True
    Spreadsheet1.BeginUndo
        Set ac = Spreadsheet1.ActiveCell
        ac.NumberFormat = "0.###"
        ac.Font.Color = "blue"
        ac.Font.Name = "times new roman"
    Spreadsheet1.EndUndo
    ExportPicture 方法
                    将指定的图表工作区或数据透视表列表保存为图形文件。语法expression.ExportPicture(FileName, FilterName, Width, Height)expression   一个返回 ChartSpace 或 PivotTable 对象的表达式。FileName   可选。String 类型。指定保存文件的名称。如果没有指定此参数,则图表工作区的默认文件名为“Chart.gif”,而数据透视表列表的默认文件名为“Pivot.gif”。FilterName   可选。String 类型。指定所使用的图形过滤器的名称。注意,唯一支持的过滤器名称为“GIF”。Width   可选。Long 类型。指定图形的宽度(以像素为单位)。必须为服务器端的图表指定此参数。Height   可选。Long 类型。指定图形的高度(以像素为单位)。必须为服务器端的图表指定此参数
    ExportPicture 方法示例本示例将图表工作区保存为图形文件。ChartSpace1.ExportPicture "sales.gif", width:=320, height:=240
      

  3.   

    Load 方法
                    从 URL 地址或本地文件中装入 XML 图表数据。此文件只能由图表 XML 构成,不能包含任何前置的 HTML 内容。字符串必须以 <script language="XML"> 开头,以 </script> 结尾。语法expression.Load(FileName)expression   一个返回 ChartSpace 对象的表达式。FileName   必选。String 类型。指定含有 XML 图表数据的文件。
    Load 方法示例本示例加载指定的 XML 数据文件。ChartSpace1.Load "chart.xml"
    RangeFromPoint 方法
                    返回图表工作区中指定位置上的最细节(最低级别)的对象。例如,如果指定了某个点的 X 和 Y 坐标,就会返回相应的 WCPoint 对象,即使系列也存在于这些坐标上。语法expression.RangeFromPoint(X, Y)expression   一个返回 ChartSpace 对象的表达式。X   必选。Integer 类型。指定对象的 X 坐标。Y   必选。Integer 类型。指定对象的 Y 坐标。
    Refresh 方法
                    刷新指定的对象(重新装载源数据或重新描绘对象)。语法expression.Refreshexpression   一个返回“应用于”列表中对象的表达式。
    Refresh 方法示例本示例重新描绘图表工作区。ChartSpace1.Refresh本示例使与数据源控件相结合的图表重新装载数据。ChartSpace1.ChartDataSources(0).Refresh
    Select 方法
                    选择指定对象。语法expression.Selectexpression   一个返回“应用于”列表中对象的表达式。
    Select 方法示例本示例选择与活动单元格位于同一行且刚好位于其右边一列的单元格。Spreadsheet1.ActiveCell.Offset(0, 1).Select
    Undo 方法
                    对于 ChartSpace 和 Spreadsheet 对象,撤消上一次单步操作或撤消上一个 BeginUndo 和 EndUndo 方法调用之间的宏块。对于 DataPage 对象,将数据访问页恢复对记录集进行编辑之前的条件(如果已保存了编辑)。语法expression.Undoexpression   一个返回 ChartSpace、DataPage 或 Spreadsheet 对象的表达式。
    Undo 方法示例本示例撤消上一次操作,或者如果不能撤消操作,则显示消息框。If Spreadsheet1.CanUndo Then
        Spreadsheet1.Undo
    Else
        MsgBox "can't undo last action"
    End If