vb.net 獲取打印機(jī)列表

Public Function EnumPrinters()

創(chuàng)新互聯(lián)建站專(zhuān)注于肅南裕固族自治網(wǎng)站建設(shè)服務(wù)及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗(yàn)。 熱誠(chéng)為您提供肅南裕固族自治營(yíng)銷(xiāo)型網(wǎng)站建設(shè)，肅南裕固族自治網(wǎng)站制作、肅南裕固族自治網(wǎng)頁(yè)設(shè)計(jì)、肅南裕固族自治網(wǎng)站官網(wǎng)定制、小程序定制開(kāi)發(fā)服務(wù)，打造肅南裕固族自治網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供肅南裕固族自治網(wǎng)站排名全網(wǎng)營(yíng)銷(xiāo)落地服務(wù)。

Dim PrinterSQL As String =

"SELECT * FROM Win32_Printer"

Dim

printers As Management.ManagementObjectCollection = New

Management.ManagementObjectSearcher(PrinterSQL).Get()

Dim printer As

Management.ManagementObject

For

Each printer In

printers

Dim pde As Management.PropertyDataCollection.PropertyDataEnumerator =

printer.Properties.GetEnumerator

While

(pde.MoveNext)

Try

If pde.Current.Name = "DriverName"

Then

combobox1.Items.Add(pde.Current.Value.ToString)

End

If

Catch ex As

Exception

MessageBox.Show(ex.ToString)

End

Try

End

While

Next

End Function

VB.NET打印編程問(wèn)題，打印機(jī)為激光打印機(jī)。

打印做得不多，以前做套打時(shí)發(fā)現(xiàn)，每臺(tái)打印機(jī)定位都不一樣，于是每臺(tái)機(jī)子都加了個(gè)偏移設(shè)置

我的做法在白紙上打上一標(biāo)尺，和一個(gè)上下邊距為2CM的交叉點(diǎn)，然后用標(biāo)尺量這2CM的偏移，設(shè)置完后，在這臺(tái)打印機(jī)打印時(shí)，就給紙張加個(gè)偏移量，打印就正常了。可能你的原因和我一樣。

另外也想問(wèn)你一下，你這個(gè)條碼是用什么打的。早先，我用立象的條碼打印機(jī)打不干膠，很簡(jiǎn)單，激光打沒(méi)用過(guò)，可能下次我也要用條碼打印，我也用VB.net。求教.

vb.net如何實(shí)現(xiàn)打印整個(gè)panel的內(nèi)容（打印機(jī)打印）

使用jquery.print插件

我用得jQuery.print, version 1.3.2。

頁(yè)面上調(diào)用代碼如下：PrintArea就是你panel的ID....

script src="~/Scripts/jQuery.print.js"/script

script

function printarea() {

$("#PrintArea").print({

globalStyles: true,

mediaPrint: false,

stylesheet: null,

noPrintSelector: ".no-print",

iframe: true,

append: null,

prepend: null,

manuallyCopyFormValues: true,

deferred: $.Deferred()

});

}

/script

a class="btn btn-success" onclick="printarea()"打印/a

VB.NET中怎么獲取當(dāng)前打印機(jī)的紙張類(lèi)型

我是VB.NET 2010版本

窗體上添加一個(gè)按鈕，代碼如下：

Imports System.Drawing.Printing

Public Class Form1

'采用關(guān)鍵字WithEvents聲明一個(gè)PrintDocument對(duì)象，會(huì)引發(fā)它的PrintPage事件

Private WithEvents My_PrintDocument As PrintDocument

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

'實(shí)例化PrintDocument對(duì)象

My_PrintDocument = New PrintDocument

'顯示默認(rèn)的打印機(jī)名稱(chēng)

MsgBox(My_PrintDocument.PrinterSettings.PrinterName)

'顯示默認(rèn)的打印機(jī)紙張類(lèi)型名稱(chēng)

MsgBox(My_PrintDocument.DefaultPageSettings.PaperSize.ToString)

End Sub

End Class

VB.NET如何實(shí)現(xiàn)打印文件時(shí)自動(dòng)彈出選擇打印機(jī)？

做不到的吧，VB還要檢測(cè)文檔程序，安全軟件都通不過(guò)的，打印時(shí)本來(lái)就是可以選擇打印機(jī)的，要開(kāi)發(fā)這樣的軟件費(fèi)用，還不如再配一臺(tái)電腦了

分享題目：vb.net打印設(shè)備 vb如何實(shí)現(xiàn)打印
本文鏈接：http://vcdvsql.cn/article48/hpgihp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)頁(yè)設(shè)計(jì)公司、網(wǎng)站設(shè)計(jì)、手機(jī)網(wǎng)站建設(shè)、標(biāo)簽優(yōu)化、面包屑導(dǎo)航、微信小程序

廣告

聲明：本網(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)