vbnet文字處理程序 vbnet 字典

vb.net 2010 調(diào)用word程序打開(kāi)一個(gè)word文檔

1 使用Shell函數(shù)直接調(diào)用

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

語(yǔ)法：Shell (pathname[,windowstyle]).Pathname是指要執(zhí)行的程序的名字和任何必須的參數(shù)或命令行開(kāi)關(guān)，可以包括目錄和驅(qū)動(dòng)器名；Windowstyle是執(zhí)行程序的窗口風(fēng)格的數(shù)字。

使用Shell調(diào)用Word比較簡(jiǎn)單，編程量小，但必須明確指定Word所在路徑，這不利于移植，而且，不能對(duì)Word進(jìn)行控制，不利于程序和Word之間的數(shù)據(jù)交換。

2 使用OLE自動(dòng)化控制Microsoft Word

2.1 使用方法

（1)Word為OLE自動(dòng)化提供一種稱(chēng)為“Basic”的對(duì)象，要在VB中控制Word ,首先要定義一個(gè)引用Word中“Basic”對(duì)象的對(duì)象變量：Dim Wordobj as Object

(2)將Word 中的“Basic”對(duì)象賦給該對(duì)象：Set Wordobj=CreateObject("Word.Basic")

(3)可以使用大多數(shù)WordBasic語(yǔ)句和函數(shù)控制Word或Word文檔，使用方法和在Word宏中使用WordBasic指令的方法基本相同。

(4)關(guān)閉Word:Set Wordobj =Nothing。

注意：“Basic”對(duì)象不支持關(guān)閉它自己的一個(gè)方法。即若在OLE自動(dòng)化中關(guān)閉了Word，則對(duì)象被置為Nothing，便不能再對(duì)對(duì)象進(jìn)行操作，程序出錯(cuò)。

2.2 VB指令與WordBasic指令的差異

(1)有一些語(yǔ)句和函數(shù)不能使用，包括：控制結(jié)構(gòu)，如While…Wend和If…Then…Else；聲明語(yǔ)句，如Dim；定制對(duì)話(huà)框相關(guān)的語(yǔ)句：FileExit語(yǔ)句；要求數(shù)組變量作為參數(shù)的語(yǔ)句或函數(shù)。

(2)也有一些指令使用方法不同。①返回字符串以一個(gè)美元符（$）結(jié)束的WordBasic函數(shù)的關(guān)鍵字必須括在方括號(hào)中。例如，在WordBasic宏中的GetBookmark$()語(yǔ)句：mark$=GetBookmark$("Address")，若用VB調(diào)用，必須這樣寫(xiě)mark$=Wordobj.[Ge-tBookmark$]("Address")。②選擇一個(gè)命令按鈕用“True”,不選擇用“False”

2.3 對(duì)OLE自動(dòng)化的說(shuō)明

Word可以為OLE自動(dòng)化給另一個(gè)應(yīng)用提供對(duì)象，但是它不能使用OLE自動(dòng)化訪(fǎng)問(wèn)其它應(yīng)用中的對(duì)象。例如：VB和Excel可以使用OLE自動(dòng)化訪(fǎng)問(wèn)Word，但是Word不能使用OLE自動(dòng)化訪(fǎng)問(wèn)它們。

3 在包容器中嵌入Word對(duì)象

在VB中，要訪(fǎng)問(wèn)在包容器中嵌入的Word對(duì)象，首先要在項(xiàng)目中插入對(duì)象。做法如下：在窗體中插入OLE控件，對(duì)象類(lèi)型選擇“MicrosoftWord圖片”或“Microsoft Word文檔”，再按“確定”。

然后用Object屬性訪(fǎng)問(wèn)文檔或圖片，并使用WordBasic語(yǔ)句和函數(shù)作用于它。嵌入的對(duì)象必須在可被訪(fǎng)問(wèn)之前被激活，可以使用Action屬性激活OLE控件。例如，使用下面指令訪(fǎng)問(wèn)一個(gè)嵌入在稱(chēng)為OLE1的OLE控件中的文檔：

Dim Wordobj as Object

OLE1.Action =7

Set Wordobj =OLE1.Object.Application. WordBasic

其他方面，使用方法同OLE自動(dòng)化。使用在包容器中嵌入的Word對(duì)象，Word顯示的窗口大小、位置與OLE控件定義的大小、位置相同，而且工具欄顯示位置與Word脫離。這一點(diǎn)與OLE自動(dòng)化相比，是個(gè)不足。

總之，要想在Microsoft Visual Basic中控制Microsoft Word，最好使用OLE自動(dòng)化，通過(guò)使用WordBasic指令對(duì)Word進(jìn)行全面控制，而且，用戶(hù)使用起來(lái)與使用Microsoft Word一樣，非常方便。

我想用vb.net做一個(gè)程序，新建一個(gè)文本文件并打開(kāi)（最前段），逐字顯示我預(yù)先設(shè)定的文字（不是一

用StreamReader和StreamWriter讀寫(xiě)文本文件，在讀取的過(guò)程中判斷字符串即可。

[VB.NET]如何用VB在窗體中實(shí)現(xiàn)閃爍文字

通過(guò)使用VB的Timer控件，程序員可以輕松的在窗體上實(shí)現(xiàn)閃爍文字的效果。本文將演示如何為L(zhǎng)abel控件加上閃爍效果，這種方法同樣適用于其它多種控件。以下代碼可以完成檢驗(yàn)ForeColor屬性的任務(wù)： Private Sub Timer1_Timer() If Label1.ForeColor = Label1.BackColor Then Label1.ForeColor = vbBlack Else Label1.ForeColor = Label1.BackColor End If End Sub 另外，你也可以讓文字采用不同的顏色，比如交替采用紅色和綠色： Private Sub Timer1_Timer() If Label1.ForeColor = vbRed Then Label1.ForeColor = vbGreen Else Label1.ForeColor = vbRed End If End Sub 當(dāng)你停止文字閃爍時(shí)，還要確定文字的狀態(tài)是可見(jiàn)的并且采用了合適的色彩。