VB.NET Word創(chuàng)建表格并錄入文字

‘首先，創(chuàng)建一個VB.NET項(xiàng)目，再點(diǎn)擊菜單”項(xiàng)目“-”添加引用“，在”Com“-”類型庫“里，選擇Microsoft.Word?14.0?Object?Library（對應(yīng)Office版本為2010），將以下代碼復(fù)制粘貼到Form1窗體替換原代碼。

成都創(chuàng)新互聯(lián)是網(wǎng)站建設(shè)技術(shù)企業(yè)，為成都企業(yè)提供專業(yè)的網(wǎng)站制作、網(wǎng)站設(shè)計(jì)，網(wǎng)站設(shè)計(jì)，網(wǎng)站制作，網(wǎng)站改版等技術(shù)服務(wù)。擁有十年豐富建站經(jīng)驗(yàn)和眾多成功案例，為您定制適合企業(yè)的網(wǎng)站。十年品質(zhì)，值得信賴！

’PS：以下代碼僅創(chuàng)建表格，將第行2至4列合并，添加1個文字，其他的你自己分析。

Imports?Microsoft.Office.Interop

Imports?Microsoft.Office.Interop.Word??'引入Word

Public?Class?Form1

Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?Handles?MyBase.Load

Dim?DWrd?As?New?Word.Application,?DDoc?As?Word.Document?'定義Word及文檔對象

DDoc?=?DWrd.Documents.Add?'新增文檔

Dim?DTbl?As?Word.Table??'定義表格對象

DTbl?=?DDoc.Tables.Add(DDoc.Range,?7,?4)??'新增表格

DTbl.Style?=?"網(wǎng)格型"??'表格的樣式

DTbl.Cell(1,?2).Select()??'選擇起始單元格為第1行/第2列

DWrd.Selection.MoveRight(,?2,?SelectionMode.MultiExtended)??'向右擴(kuò)展兩個單元格(即選擇第1行的第2至4列)

DWrd.Selection().Cells.Merge()??'單元格合并

DTbl.Cell(1,?1).Range.Text?=?1??'在第1個單元格填寫文本

DWrd.Visible?=?True?'顯示W(wǎng)ord

End?Sub

End?Class

vb.nettxt無法輸入

你是用輸入法的吧，這個是.Net Framework的Bug吧，用輸入法的步驟如下：

1、首先保證文本框有焦點(diǎn)

2、按下2次Ctrl+空格

3、切換到自己要用的輸入法

這樣一般都可以了

VB列表框內(nèi)輸入文字應(yīng)該怎么弄？

方法和詳細(xì)的操作步驟如下：

1、第一步，打開VB軟件并在表單上添加一個列表框，見下圖，轉(zhuǎn)到下面的步驟。

2、第二步，執(zhí)行完上面的操作之后，單擊列表框，然后在屬性窗口中，設(shè)置列表框的已知屬性和內(nèi)容，見下圖，轉(zhuǎn)到下面的步驟。

3、第三步，執(zhí)行完上面的操作之后，在表單上，添加兩個命令按鈕，見下圖，轉(zhuǎn)到下面的步驟。

4、第四步，執(zhí)行完上面的操作之后，分別設(shè)置兩個命令按鈕的屬性，見下圖，轉(zhuǎn)到下面的步驟。

5、第五步，執(zhí)行完上面的操作之后，雙擊“清除”命令按鈕以編輯其代碼，見下圖，轉(zhuǎn)到下面的步驟。

6、第六步，執(zhí)行完上面的操作之后，運(yùn)行程序并驗(yàn)證結(jié)果。

在列表框中選擇“語言”，然后單擊“復(fù)制”命令按鈕，然后將“語言”項(xiàng)復(fù)制到列表框中，見下圖。這樣，就解決了這個問題了。