VB控制WORD,使用WORDR的模板.在指定位置输出数据,100分求

来源:百度知道 编辑:UC知道 时间:2024/09/28 10:06:36
如何用VB控制WORD,使用WORDR的模板.在指定位置输出数据.
比如说怎样居中(左右居中,还有上下居中),下划线怎么显示,怎么换行,怎么在使用模板的情况下,在一定的位置输出数据(没有使用表格),如果使用了表格,在表格中输出数据怎么控制,等等,这些怎么控制.
如果有人帮忙解决,我愿意以100分答谢.
急求!!!!

要把下列内容复制到写字板中,另存为SetWord.cls文件,然后在把它添加到工程中,就可以使用了。

VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB_Name = "SetWord"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Private mywdapp As Word.Application
Private mysel As Object

'属性值的模块变量
Private C_TemplateDoc As String
Private C_newDoc As String
Private C_PicFile As String
Private C_ErrMsg As Integer

Public Event HaveError()
Attribute HaveError.VB_Description = "出错时激发此事件.出错代码为ErrMsg属性"
'***************************************************************
'ErrMsg代码:1-word没有安装 2 - 缺少参数 3 - 没权限写文件
' 4 - 文件不存在
'