以下這段代碼可以達(dá)到你的目標(biāo):
目前創(chuàng)新互聯(lián)已為上千余家的企業(yè)提供了網(wǎng)站建設(shè)、域名、虛擬空間、綿陽(yáng)服務(wù)器托管、企業(yè)網(wǎng)站設(shè)計(jì)、孫吳網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶(hù)導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶(hù)和合作伙伴齊心協(xié)力一起成長(zhǎng),共同發(fā)展。
Dim WDAPP As Object
Dim p As String = InputBox("請(qǐng)輸入")
WDAPP = CreateObject("Word.Application")
WDAPP.Documents.Add(TextBox1.Text)
WDAPP.Selection.Find.Execute(p)
MsgBox("從" TextBox1.Text "中查詢(xún)到的" p "首次出現(xiàn)的位置的頁(yè)碼為:" WDAPP.Selection.Information(3))
要用printpreviewdialog1,或者用printpreviewdialog類(lèi)來(lái)達(dá)到預(yù)覽效果時(shí),必須要用到drawstring方法。也就是說(shuō)當(dāng)你點(diǎn)擊預(yù)覽效果,如果能看到文檔的內(nèi)容顯示在程序窗口的白紙上時(shí),就能打印了。我用c#寫(xiě)過(guò)完整的打印和預(yù)覽效果,還可以添加頁(yè)碼,不清楚的就加我qq:332862871
有個(gè)PrintDocument控件,可以實(shí)現(xiàn)打印。。。
MSDN原話:
使用 PrintDocument 組件
涉及 PrintDocument 組件的兩種主要情況是:
簡(jiǎn)單的打印作業(yè),如打印單個(gè)文本文件。在這種情況下,應(yīng)將 PrintDocument 組件添加到 Windows 窗體,然后在 PrintPage 事件處理程序中添加打印文件的編程邏輯。 該編程邏輯應(yīng)以使用 Print 方法打印文檔結(jié)束。
此方法向打印機(jī)發(fā)送一個(gè) Graphics 對(duì)象,該對(duì)象包含在 PrintPageEventArgs 類(lèi)的 Graphics 屬性中。
有關(guān)如何使用 PrintDocument 組件打印文本文檔的示例,請(qǐng)參見(jiàn)
如何:打印 Windows 窗體中的多頁(yè)文本文件。
更為復(fù)雜的打印作業(yè),如想要重新使用已編寫(xiě)的打印邏輯的情況。
在這種情況下,應(yīng)從 PrintDocument 組件派生一個(gè)新組件,并重寫(xiě)
(請(qǐng)參見(jiàn) Visual Basic 的 重寫(xiě)或 C# 的 重寫(xiě)) PrintPage 事件。
將 PrintDocument 組件添加到窗體后,它出現(xiàn)在 Windows 窗體設(shè)計(jì)器底部的欄中