OWC==> Office Web Components
是微软Office的轻量级开发工具,随Office安装时一起安装
Office2003版本对应OWC11,里面有5个控件对象
图表工作区对象
数据源控件对象
记录集控件对象
数据透视表列表对象
电子表格对象
很久以前用过的,最近有人问就翻出来看看
其实很简单,只是可能没有到注意文档罢了
我简单用VB做了下常用的SpreadSheet例子
Form上加一个Spreadsheet控件
代码,很简单,没什么好说的
Private
Sub
Form_Load()
' 单元格
' 可以使用循环的方式填充单元格
Spreadsheet1.Cells( 1 , 1 ) = " 第1个格"
Spreadsheet1.Cells( 1 , 5 ) = " 第5个格"
' 区域
' 合并
Spreadsheet1.Range( " A3:D3 " ).Merge
Spreadsheet1.Range( " A3:D3 " ).Value = " 合并效果"
' 格式设置
Spreadsheet1.Range( " A3:D3 " ).Font.Name = " 黑体"
Spreadsheet1.Range( " A3:D3 " ).Font.Size = 15
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeTop).Color = vbRed
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeBottom).Color = vbRed
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeLeft).Color = vbRed
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeRight).Color = vbRed
' ' '不提示直接保存为本地文件
' ' Spreadsheet1.Export "c:\xxx.xls", ssExportActionNone
' ' '直接在Excel中打开
' ' Spreadsheet1.Export "c:\xxx.xls", ssExportActionOpenInExcel
End Sub
' 单元格
' 可以使用循环的方式填充单元格
Spreadsheet1.Cells( 1 , 1 ) = " 第1个格"
Spreadsheet1.Cells( 1 , 5 ) = " 第5个格"
' 区域
' 合并
Spreadsheet1.Range( " A3:D3 " ).Merge
Spreadsheet1.Range( " A3:D3 " ).Value = " 合并效果"
' 格式设置
Spreadsheet1.Range( " A3:D3 " ).Font.Name = " 黑体"
Spreadsheet1.Range( " A3:D3 " ).Font.Size = 15
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeTop).Color = vbRed
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeBottom).Color = vbRed
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeLeft).Color = vbRed
Spreadsheet1.Range( " A3:D3 " ).Borders(xlEdgeRight).Color = vbRed
' ' '不提示直接保存为本地文件
' ' Spreadsheet1.Export "c:\xxx.xls", ssExportActionNone
' ' '直接在Excel中打开
' ' Spreadsheet1.Export "c:\xxx.xls", ssExportActionOpenInExcel
End Sub
运行出来就是这个样子
因为整个编程中使用了VBA语法,所以还是很容易理解的
如果你的机器上安装了Office2000/xp/2003
那么你的机器上已经有使用文档及开发文档了,很详尽,参照一下,应该没啥问题。
我的机器装的是2003,在如下位置上有相关文档
C:
\
Program Files
\
Common Files
\
Microsoft Shared
\
Web Components
\
10
\
2052
C:
\
Program Files
\
Common Files
\
Microsoft Shared
\
Web Components
\
11
\
2052
前面的文档都是使用帮助
OWCVBA11.CHM 是开发文档
文本的小例子在此处下载 ,VB的
http://files.cnblogs.com/babyt/Owc1.rar