vb點(diǎn)虐 第三方打印 vbs 打印機(jī)

高分求解vb點(diǎn)虐 打印的問(wèn)題

報(bào)表打印應(yīng)該也能實(shí)現(xiàn)，但是我覺(jué)得你這個(gè)用文本打印更簡(jiǎn)單，將數(shù)據(jù)輸出到txt文件，結(jié)果用RichTextBox顯示，但是需要簡(jiǎn)單的排版，調(diào)用打印機(jī)打印RichTextBox即可的

公司主營(yíng)業(yè)務(wù)：成都做網(wǎng)站、網(wǎng)站設(shè)計(jì)、外貿(mào)營(yíng)銷網(wǎng)站建設(shè)、移動(dòng)網(wǎng)站開(kāi)發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實(shí)現(xiàn)互聯(lián)網(wǎng)宣傳，提高企業(yè)的競(jìng)爭(zhēng)能力。創(chuàng)新互聯(lián)是一支青春激揚(yáng)、勤奮敬業(yè)、活力青春激揚(yáng)、勤奮敬業(yè)、活力澎湃、和諧高效的團(tuán)隊(duì)。公司秉承以“開(kāi)放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化，感謝他們對(duì)我們的高要求，感謝他們從不同領(lǐng)域給我們帶來(lái)的挑戰(zhàn)，讓我們激情的團(tuán)隊(duì)有機(jī)會(huì)用頭腦與智慧不斷的給客戶帶來(lái)驚喜。創(chuàng)新互聯(lián)推出湯原免費(fèi)做網(wǎng)站回饋大家。

排版用tab（）、space（）、vbcrlf或PrintLine(1)換行，代碼類似如下樣式

PrintLine(1, TAB(60), "準(zhǔn)考證" )

PrintLine(1)

PrintLine(1, "姓名:" xingming Space(3) "準(zhǔn)考證號(hào)：" cel(1) Space(3) cel(2) Space(3) cel(3))

但是TAB()排版比較規(guī)整

打印代碼類似如下：

PrintDialog1.Document = PrintDocument1

PrintDocument1.DocumentName = "準(zhǔn)考證"

PrintDialog1.AllowSomePages = False

PrintDialog1.ShowHelp = False

PrintDialog1.ShowNetwork = False

PrintDialog1.AllowSelection = False

PrintDialog1.AllowPrintToFile = False

MySReader = New StringReader(RichTextBox1.Text)

stringToPrint = MySReader.ReadToEnd()

PageSetupDialog1.Document = PrintDocument1

PageSetupDialog1.PageSettings.Margins.Bottom = 50

PageSetupDialog1.PageSettings.Margins.Top = 50

PageSetupDialog1.PageSettings.Margins.Left = 50

PageSetupDialog1.PageSettings.Margins.Right = 50

If PageSetupDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then

PrintDocument1.DefaultPageSettings = PageSetupDialog1.PageSettings '頁(yè)面設(shè)置

If PrintDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then

If PrintDialog1.PrinterSettings.IsValid = True Then

PrintDocument1.Print()

MsgBox("打印完成！" vbCrLf "Print completed!", , "Print hint(打印提示)")

Else

MsgBox("打印失敗！打印機(jī)不可用。" vbCrLf "Print failed! The printer is not valid.", , "Print hint(打印提示)")

End If

Else

Exit Sub

End If

End If

vb點(diǎn)虐 打印問(wèn)題

可以將打印機(jī)默認(rèn)打印設(shè)置改為黑白打印，如果打印對(duì)象是RGB配色，打印機(jī)驅(qū)動(dòng)轉(zhuǎn)換為CMYK顏色時(shí)，黑色都是由彩色墨水組成的

2.可以試一下圖片從一個(gè)標(biāo)準(zhǔn)灰度圖片格式化而來(lái)，這樣圖片自身只有黑白色，也許可以

VS2005如何用VB.NET代碼實(shí)現(xiàn)打印功能

有個(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 類的 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ì)器底部的欄中

分享文章：vb點(diǎn)虐 第三方打印 vbs 打印機(jī)
地址分享：http://bm7419.com/article14/ddepige.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供用戶體驗(yàn)、營(yíng)銷型網(wǎng)站建設(shè)、云服務(wù)器、自適應(yīng)網(wǎng)站、軟件開(kāi)發(fā)、動(dòng)態(tài)網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)