VB中如何生成一個(gè)WORD文檔（有圖）

程序采用VB編程實(shí)現(xiàn)，需要機(jī)器安裝有VB應(yīng)用程序及Microsoft Office組件。打開VB，新建一個(gè)VB工程，取名Proc_Word，將啟動(dòng)窗體命名為FrmMain，選擇“工程”菜單中的“引用”，在“引用”對(duì)話框中選擇 “Microsoft Word8.0 Object Library”（這一步很重要，你必須選擇這一ActiveX部件，否則代碼不能正確運(yùn)行，順便說一句，如果安裝的是Office2000，那么應(yīng)該選擇“Microsoft Word9.0 Object Library”）。同時(shí)在“工程”菜單中“部件”對(duì)話框中選擇添加“Microsoft Windows common controls -2.5(sp2)”，以便在窗體設(shè)計(jì)中可以使用微調(diào)控件。

網(wǎng)站建設(shè)哪家好，找創(chuàng)新互聯(lián)建站！專注于網(wǎng)頁設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、微信小程序開發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了閬中免費(fèi)建站歡迎大家使用！

如何在VB中建立word文檔，并寫入文字和圖片？

首先說明，你這樣是寫TXT，不是DOC，雖然Word可以打開，但根本就不是Word文件。當(dāng)然不能存儲(chǔ)圖片了。請(qǐng)參考我以下的代碼。建一個(gè)Command1。

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

Dim

ap

As

Word.Application,

doc

As

Document

Private

Sub

Form_Load()

'這個(gè)過程不必做修改，是建立一個(gè)新的Word文檔

Set

ap

=

CreateObject("word.application")

ap.Visible

=

True

Set

doc

=

ap.Documents.Add

End

Sub

Private

Sub

Command1_Click()

doc.Content.InsertAfter

Text:="請(qǐng)輸入你要輸入的內(nèi)容"

'插入文字，請(qǐng)使用這種格式

doc.Shapes.AddPicture

FileName:="D:\a.jpg"

'插入圖片，請(qǐng)使用這種格式，路徑自己寫

End

Sub

其他問題再找我。

怎樣用VB.NET生成一個(gè)復(fù)雜的word表格？

轉(zhuǎn)換表格的時(shí)候應(yīng)該有選項(xiàng)的（光標(biāo)一般放置在外層表格區(qū)域），如圖，取消 轉(zhuǎn)換嵌套表格。

當(dāng)然，對(duì)于特別復(fù)雜及不規(guī)則的表格（粘貼過程中也可能導(dǎo)致表格錯(cuò)亂），用FRONTPAGE調(diào)整一下也是不錯(cuò)的主意。

參考文獻(xiàn)：OFFICE XP測(cè)試

vb.net怎么對(duì)word進(jìn)行操作？？？？

不清楚報(bào)錯(cuò)信息，只能給以下提示：

1、工程--引用,選Microsoft Word 11.0 Object Library

2、聲明并賦值word程序相關(guān)變量，注意步驟不能亂。

Dim appObj As New Word.Application '新建一個(gè)word程序?qū)ο?/p>

Dim docObj As Word.Document '聲明文檔對(duì)象，也可以用new新建

Dim strFile As String = "D:\MyDocu.doc"

docObj = appObj.Documents.Open(strFile, False, False, False, "", "", False, "", "", , False, False, False) '打開文檔

docObj.Activate()'激活文檔

.......

With docObj

.Save()

.Close()

End With

docObj = Nothing

appObj = Nothing

注意：聲明word對(duì)象和文檔對(duì)象，應(yīng)該提示錯(cuò)誤，你只需要點(diǎn)擊“示警”圖標(biāo)，在展打的選項(xiàng)里選第1項(xiàng)導(dǎo)入就可以了。

vb.net 如何創(chuàng)建一個(gè)word文檔

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

System.IO.Directory.CreateDirectory("C:\我的文件夾") '創(chuàng)建目錄,路徑就自己改吧,如果路徑存在,就沒必要?jiǎng)?chuàng)建了

System.IO.File.Create("C:\我的文件夾\我的文件.doc") '在指定目錄下創(chuàng)建word文檔

End Sub