繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 在word中如何控制graph控件
- ASP.NET
- ASP.NET编程中的十大技巧
- ASP.NET常用函数(推荐)
- ASP.NET上传图片并生成可带版权信息的缩略图
- 用javascript打造搜索工具栏
- ASP.NET中动态控制RDLC报表
- 用ASP.NET还原与恢复Sql server
- 在ASP.NET里得到网站的域名
- Asp.net中的mail的发送
- 用ASP.Net实现文件的在线压缩和解压缩
- ASP.NET中文件上传下载方法集合
- ASP.NET通过Remoting service上传文件
- ASP.NET2.0服务器控件之Render方法
- ASP.NET2.0新特性概述
- asp.net2.0如何加密数据库联接字符串
- 用.NET 2.0压缩/解压功能处理大型数据
- ASP.NET入门随想之检票的老太太
- ASP与ASP.NET互通COOKIES的一点经验
- ASP.NET2.0数据库入门之SqlDataSource
- ASP.NET2.0数据库入门之SQL Server
- ASP.NET 2.0下的条件编译
ASP.NET 中的 在word中如何控制graph控件
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 181 ::
收藏到网摘: 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()
评论 (0) All
