A. vb.net 如何创建一个word文档
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
System.IO.Directory.CreateDirectory("C:\我的文件夹") '创建目录,路径就自己内改吧,如果路径存在,就没必要创建了
System.IO.File.Create("C:\我的文件夹\我的文件.doc") '在指容定目录下创建word文档
End Sub
B. 怎么用VB自动生成一个word文件啊
工仔厅程旦戚渗下引用microsoft word 11.0 object library
Private Sub Command1_Click()
Dim word1 As Word.Application
If word1 Is Nothing Then
Set word1 = CreateObject("word.application"模脊)
word1.Visible = True
word1.Documents.Add
End If
End Sub
C. 怎样在VB中输出word文档
Dim WordApp As Word.Application'定义word应用变量
Dim newDoc As Word.Document'定义word文档变量腊者裤
Set WordApp = CreateObject("Word.Application")'创建新的word应用
WordApp.Visible = True
With WordApp
Set newDoc = .Documents.Add(App.Path & "\报告单\食品水质报告.Doc")'在创建的word应用中新建一个新的word文档
With .Selection
.GoTo wdGoToBookmark, , , "bh" bh为word文档中的对应位置的标签名
.TypeText PrnBID'写内容
.GoTo wdGoToBookmark, , , "GoodsName" 'GoodsName为word文档中的对应位置嫌纯的标签名
.TypeText PrnGName'写内容
Set MyRS = Nothing
End With
' newDoc.SaveAs FileName:=FilePath
End With
' If theError = 429 Then WordApp.Quit
Set WordApp = Nothing
在事先做好的word文档中要写内容的位置设轮简定好标签,然后在程序中找到标签,再写入数据
D. 如何在VB中建立word文档，并写入文字和图片
首先说明，你这样是写TXT，不是DOC，虽然Word可以打开，但根本就不是Word文件。当然不能存储图片了。请参考我以下的代码。建一个Command1。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Dim
ap
As
Word.Application,
doc
As
Document
Private
Sub
Form_Load()
'这个过程不必做修改，是建立一个新的Word文档
Set
ap
=
CreateObject("word.application")
ap.Visible
=
True
Set
doc
=
ap.Documents.Add
End
Sub
Private
Sub
Command1_Click()
doc.Content.InsertAfter
Text:="请输入你要输入的内容"
'插入文字，请使用这种格式
doc.Shapes.AddPicture
FileName:="D:\a.jpg"
'插入图片，请使用这种格式，路径自己写
End
Sub
其他问题再找我。
E. VB 生成word文档
Dim ap As Word.Application, doc As Document
Private Sub Form_Load() '这个过程不必做修改，是建立一个新的Word文档
Set ap = CreateObject("word.application"谈孙)
ap.Visible = False
Set doc = ap.Documents.Add
End Sub
Private Sub Command1_Click()
'doc.Content.InsertAfter Text:="请输入你要输入的内容" '插入文字，请使用这种格含陪链式
doc.Content.InsertAfter Text1.Text
doc.SaveAs App.Path & "\a.doc"乱察
doc.Close
End Sub
F. vb中如何生成一个word文档 [问题点数：100分，结帖人lyb826]
Word提供了一个Word对象，通过在“引用”中的该对象，可以实现对Word的控制。以下的代码演示了执行WordBasic语句埋腊，该段代码是动态引用对象，无须在工程中引用Word对虚纯象。
DimwdAsObject
Setwd=CreateObject("Word.Basic")
wd.FileNewDefault
wd.FontSize20
wd.Insert"Hello,World"
wd.FileSaveAs"Hello.Doc"
wd.FileClose
执行后，将产生一个Hello.Doc。一个种办法是在Word中调试好WordBasic语句后，再弯誉滑发布到VB中。类似的处理应该也可以用在Execl中。
G. VB中如何生成一个WORD文档（有图）
程序采用VB编程亩高实现，需要机器安装有VB应用程序及Microsoft Office组件。打开VB，新建一个VB工程，取名Proc_Word，将启动窗体命名为FrmMain，选择“工基尺程”菜单中的“引用”，在“引用”对话框中选择 “Microsoft Word8.0 Object Library”（这一步很重要，你必须选择这一ActiveX部件，否则代码不能正确运行，顺便说一句，如果安装的是Office2000，那么应该选择“Microsoft Word9.0 Object Library”）。同时在“工程”菜单中“部件”对话框中选择添加“Microsoft Windows common controls -2.5(sp2)”，以便在窗体搏耐高设计中可以使用微调控件。
H. 如何用VB调用WORD文档，请高手进，谢谢~！~
知道,不过不能直接读取,因为微软没有公布加密方式,所以要调用WORD来读取,然后获取它
先在工程的引用里面加上Microsoft Word 11.0 Object Library
Dim 剪切板文本
Dim Word文字处理系统界面 As Word.Application '建立一个word.application对象
Dim Word文档 As Word.Document
Dim Word文档文本 As Word.Selection '在word文字处理系统中添加一个文档
Set Word文字处理系统界面 = CreateObject("Word.Application") '选择对象
Word文字处理系统界面.Visible = False '不显示word.application，即word文字处理系统界面
Set Word文档 = Word文字处理系统界面.Documents.Open(文件路径)
Set Word文档文本 = Word文字处理系统界面.Selection
Word文档文本.WholeStory
Word文档文本.Copy
剪切板文本 = Clipboard.GetText(vbCFText) '放到text1中
Text1.Text = 剪切板文本
'Clipboard.SetData Temp
Word文档.Close '关闭文档
Word文字处理系统界面.Application.Quit
Set Word文字处理系统界面 = Nothing '清空变量
Set Word文档文本 = Nothing
'完成操作
我通过剪切板来获取文本,因为这样可以保留格式(本人独创)
如果直接获取也是可以的,不过格式全部丢失,所以我的方法会更好一点
I. 怎么把输出在VB窗口界面上内容直接存为TXT或WORD文件
是这样，如果你想保存所有的输出内容为txt文件要用open命令。这个命令在不同的vb版本中用法不太一样，Open
pathname
For
mode
[Access
access]
[lock]
As
[#]filenumber
[Len=reclength]举个例子：
open
"c:\aa.txt"
for
output
as
#1
print
#1,
"asdfasdf
"
close
#1
将"asdfasdf
"
保存到"c:\aa.txt",输出语句print
#1,(在这儿可以用变量)比如form1.text1.text是保存本窗体文本框中的内容。详细用法建议去msdn中查看。也可以在搜索引擎中搜vb
open，就可以查到了。
J. 别人发给我的VB程序图标变成WORD文档图标，打开也是以WORD的形式。请问有什么办法可以解决呢
你看看他发给你的到春启州底是不是WORD，如果是的，那就只能说他发错旁虚了，如果不是，那你扒蔽右击，选打开方式，然后选VB就好了