最近2018中文字幕在日韩欧美国产成人片_国产日韩精品一区二区在线_在线观看成年美女黄网色视频_国产精品一区三区五区_国产精彩刺激乱对白_看黄色黄大色黄片免费_人人超碰自拍cao_国产高清av在线_亚洲精品电影av_日韩美女尤物视频网站

RELATEED CONSULTING
相關咨詢
選擇下列產品馬上在線溝通
服務時間:8:30-17:00
你可能遇到了下面的問題
關閉右側工具欄

新聞中心

這里有您想知道的互聯(lián)網營銷解決方案
vb.net中打印代碼,vb編寫打印程序

vb.net如何實現打印整個panel的內容(打印機打?。?/h2>

使用jquery.print插件

創(chuàng)新互聯(lián)網站建設公司是一家服務多年做網站建設策劃設計制作的公司,為廣大用戶提供了網站設計制作、做網站,成都網站設計,廣告投放,成都做網站選創(chuàng)新互聯(lián),貼合企業(yè)需求,高性價比,滿足客戶不同層次的需求一站式服務歡迎致電。

我用得jQuery.print, version 1.3.2。

頁面上調用代碼如下: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打印的例子

PrintDocument1.Print()

使用PrintDocument進行打印“Brush, 50, 80”50左邊距離,80上面距離

Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

Dim mypen As Pen = New Pen(Color.Blue, 2)

e.Graphics.DrawString("取號單", New Font("Microsoft Sans Serif", 18, FontStyle.Bold), New Pen(Color.Black, 1).Brush, 30, 30)

e.Graphics.DrawString("XXXXXX", New Font("Microsoft Sans Serif", 24, FontStyle.Regular), New Pen(Color.Black, 1).Brush, 50, 80)

e.Graphics.DrawString("您的號碼是:", New Font("Microsoft Sans Serif", 16, FontStyle.Regular), New Pen(Color.Black, 1).Brush, 30, 135)

e.Graphics.DrawString("打印時間:" Now(), New Font("Microsoft Sans Serif", 10, FontStyle.Regular), New Pen(Color.Black, 1).Brush, 80, 330)

End Sub

vb.net如何實現打印DataGridView1里的內容,求源碼

使用 PrintDocument 控件的 Print() 方法可以打印指定對象中的內容,參考代碼如下:

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

PrintDocument1.Print()

End?Sub

Private?Sub?PrintDocument1_PrintPage(ByVal?sender?As?System.Object,?ByVal?e?As?System.Drawing.Printing.PrintPageEventArgs)?Handles?PrintDocument1.PrintPage

Dim?bm?As?New?Bitmap(Me.DataGridView1.Width,?Me.DataGridView1.Height)

DataGridView1.DrawToBitmap(bm,?New?Rectangle(0,?0,?Me.DataGridView1.Width,?Me.DataGridView1.Height))

e.Graphics.DrawImage(bm,?0,?0)

End?Sub


當前題目:vb.net中打印代碼,vb編寫打印程序
URL地址:http://fisionsoft.com.cn/article/hdsggd.html