易截截图软件、单文件、免安装、纯绿色、仅160KB

关于vb生成word的问题,各位大侠帮帮忙 - VB / 基础类

最近刚接触vb,用vb写了一个东东,是用vb生成一个word文档,下了一个例子,可是把例子的代码copy到我自己建的工程中就报user-defined type not defined,
各位大侠这是怎么回事呢?难道在新建的工程中还要添加控件之类的东西吗?vb新手,请不要见笑
user-defined type not defined----自定义类型没定义.变量名使用问题

引用word了吗?
将出错的代码贴出来啊

真接考当然不能用,要在工程,引用,里添上microsoft word libary

ningweidong你说的那个microsoft word libary我的机子上怎么找不到?全称是这个吗?还是microsoft word 文档?

工程--引用
Microsoft Word 11.0 Object Libraryy -----office 2003
Microsoft Word 12.0 Object Libraryy -----offece 2007

VB code:

Option Explicit
Dim wd As New Word.Application
Dim wd0 As New Word.Application
Dim wddoc As Word.ActiveDocument
Dim wdpg As Word.PageSetup

Dim wshp As Word.Shape
Dim px As Word.Paragraph



Private Sub Command1_Click()
wd0.Documents.Add
With wd0
.Selection.TypeText Text:="题目"
.Selection.HomeKey Unit:=wdLine, Extend:=wdExtend
.Selection.Font.Name = "宋体"
.Selection.Font.Size = 18
.Selection.Font.Bold = wdToggle
.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
End With
wd.Documents.Add
Set wddoc = wd.ActiveDocument
Set wdpg = wddoc.PageSetup
wdpg.PaperSize = wdPaperA4 '7 A3=6

With wddo


相关问答:

vb - VB / 基础类

数据库里有一个字段的内容是二进制,怎么才能把这个二进制读出来
使用字节流对象可以实现

例如现在数据库里有个字段的内容是0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......

vb - VB / 非技术类

怎么把已知的数据保存成xml文件,现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

vb 中 - VB / 基础类

dim a as string,b as string,c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串,而不存在c字符串

看看i ......

vb生成EXE - VB / 基础类

form1中有text1-8, 和command1 
text8中为程序代码(生成窗体为form2(已做好))
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题 ......

VB如何获得别的程序上的表格内容? - VB / API

我的要求是:通过抓取别的程序上的表格的句柄,然后读取这个表格的内容。
表格句柄(类名:MSFlexGridWndClass)我已抓到,接下来如何读取表格的内容就不会了?求助。

能把代码发来学习下不?
244326867@qq.com ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号