怎樣用熱敏打印機(jī)把vb.net窗體內(nèi)文本框內(nèi)容打印出來

用PrintForm控件，在Visual Basic PowerPacks項(xiàng)目列表中vb2008 SP1以后版本就有了，下面是代碼

黃巖網(wǎng)站制作公司哪家好，找創(chuàng)新互聯(lián)！從網(wǎng)頁設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、響應(yīng)式網(wǎng)站設(shè)計(jì)等網(wǎng)站項(xiàng)目制作，到程序開發(fā)，運(yùn)營(yíng)維護(hù)。創(chuàng)新互聯(lián)從2013年創(chuàng)立到現(xiàn)在10年的時(shí)間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)。

Imports System.Drawing.Printing

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

'先設(shè)置打印頁面的頁邊距

With Me.PrintForm1

Dim myMargins As New Margins '頁邊距設(shè)置信息是存放在這個(gè)Margins類型的對(duì)象中的

With myMargins '分別設(shè)置上下左右邊距,

.Left = 12

.Right = 12

.Top = 12

.Bottom = 12

End With

.PrinterSettings.DefaultPageSettings.Margins = myMargins '把myMargins對(duì)象賦給PrintForm1的設(shè)置屬性

End With

Me.Button1.Visible = False '這個(gè)是在打印的時(shí)候隱藏打印按鈕

Me.PrintForm1.Form = Me '設(shè)置要打印的窗體

Me.PrintForm1.Print() '調(diào)用打印窗體方法

Me.Button1.Visible = True '再把隱藏的打印按鈕顯示出來

End Sub

VB中如何隱藏命令按鈕

1）設(shè)計(jì)時(shí)設(shè)置按鈕控件的Visible為False

2）代碼中 Command1.Visible = False

vb.net徹底隱藏文件夾

1、首先，打開電腦，點(diǎn)擊電腦界面中的vbnet軟件。

2、其次，點(diǎn)擊該軟件的隱藏按鈕，進(jìn)入隱藏界面。

3、最后，選擇要隱藏的文件，點(diǎn)擊徹底隱藏即可，是非常簡(jiǎn)單的。