当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 在word中如何控制graph控件

ASP.NET
asp.net css注释的影响
ASP.NET与数据库相关技巧
关于HtmlForm控件
三色交替的下拉列表框
精通ASP.NET中弹出窗口技术
ASP.NET Forums与现有系统整合方案示例
ASP.NET操作IIS中的虚拟目录
DataGrid与SQL Server 2000数据绑定
如何让Web应用程序在Client端实现导出报表功能
如何保证web app中的Send Email线程稳定性
关于用ASP.Net识别远程主机服务器种类
ASP.NET中上传下载文件
提高ASP.NET性能的方法
asp.net StreamReader 创建文件
asp.net如何生成图片验证码(简单)
一个.net 压缩位图至JPEG的代码
简单的SQL Server数据库数据读取与数据操作
获取网站的RSS聚合到自己的网页
.Net程序中整站通用的防SQL注入函数
asp.net生成缩略图及给原始图加水印的函数

ASP.NET 中的 在word中如何控制graph控件


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 95 ::
收藏到网摘: n/a


Dim objShape As Word.InlineShape Dim objChart As Object Dim objDataSheet As Object Dim axis As Graph.Axis
Dim strKey as string 'bookmark的名称
'首先要在word中嵌入一个graph,然后把这个graph添加一个bookMark(书签),名字就是strKey的内容
objShape = mobjDoc.Bookmarks.Item(strKey).Range.InlineShapes.Item(1) objShape.OLEFormat.DoVerb(VerbIndex:=Word.WdOLEVerb.wdOLEVerbHide) objChart = objShape.OLEFormat.Object()
'设置横轴的属性
axis = objChart.Axes(2, 1)
'最小刻度 axis.MinimumScale = 0
'主要刻度单位 axis.MajorUnit = 10
'次要刻度单位 axis.MinorUnit = 10
'最大刻度 axis.MaximumScale = 50
'在graph的表格中填写内容
objDataSheet = objChart.Application.DataSheet objDataSheet.Cells(1, 1) = "aa"
'对表格进行更新
objChart.Application.Update()
'退出graph程序 objChart.Application.QUIT()