建站
咨詢
售后
建站咨詢
新聞中心
怎樣用熱敏打印機(jī)把vb.net窗體內(nèi)文本框內(nèi)容打印出來
用PrintForm控件，在Visual Basic PowerPacks項(xiàng)目列表中vb2008 SP1以后版本就有了，下面是代碼
目前成都創(chuàng)新互聯(lián)公司已為上千家的企業(yè)提供了網(wǎng)站建設(shè)、域名、網(wǎng)絡(luò)空間、網(wǎng)站運(yùn)營、企業(yè)網(wǎng)站設(shè)計(jì)、東烏珠穆沁網(wǎng)站維護(hù)等服務(wù)，公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略，正道將秉承"和諧、參與、激情"的文化，與客戶和合作伙伴齊心協(xié)力一起成長，共同發(fā)展。
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.net 怎么實(shí)現(xiàn)發(fā)票打印窗體，按窗體上的格式打印出來，用的是access數(shù)據(jù)庫，請(qǐng)高手幫忙！
選擇開始菜單中→程序→【Management SQL Server 2008】→【SQL Server Management Studio】命令，打開【SQL Server Management Studio】窗口，并使用Windows或 SQL Server身份驗(yàn)證建立連接。
在【對(duì)象資源管理器】窗口中展開服務(wù)器，然后選擇【數(shù)據(jù)庫】節(jié)點(diǎn)
右鍵單擊【數(shù)據(jù)庫】節(jié)點(diǎn)，從彈出來的快捷菜單中選擇【新建數(shù)據(jù)庫】命令。
執(zhí)行上述操作后，會(huì)彈出【新建數(shù)據(jù)庫】對(duì)話框。在對(duì)話框、左側(cè)有3個(gè)選項(xiàng)，分別是【常規(guī)】、【選項(xiàng)】和【文件組】。完成這三個(gè)選項(xiàng)中的設(shè)置會(huì)后，就完成了數(shù)據(jù)庫的創(chuàng)建工作，
在【數(shù)據(jù)庫名稱】文本框中輸入要新建數(shù)據(jù)庫的名稱。例如，這里以“新建的數(shù)據(jù)庫”。
在【所有者】文本框中輸入新建數(shù)據(jù)庫的所有者，如sa。根據(jù)數(shù)據(jù)庫的使用情況，選擇啟用或者禁用【使用全文索引】復(fù)選框。
在【數(shù)據(jù)庫文件】列表中包括兩行，一行是數(shù)據(jù)庫文件，而另一行是日記文件。通過單擊下面的【添加】、【刪除】按鈕添加或刪除數(shù)據(jù)庫文件。
切換到【選項(xiàng)頁】、在這里可以設(shè)置數(shù)據(jù)庫的排序規(guī)則、恢復(fù)模式、兼容級(jí)別和其他屬性。
切換到【文件組】頁，在這里可以添加或刪除文件組。
完成以上操作后，單擊【確定】按鈕關(guān)閉【新建數(shù)據(jù)庫】對(duì)話框。至此“新建的數(shù)據(jù)”數(shù)據(jù)庫創(chuàng)建成功。新建的數(shù)據(jù)庫可以再【對(duì)象資源管理器】窗口看到。
vb.net 怎么用print打印字符串到窗口？
vb的函數(shù)已經(jīng)不適合vb.net了，想學(xué)vb，得裝個(gè)vb6。用vb.net的話，使用Debug.WriteLine("hello world")，可以在輸出窗口查看到這個(gè)信息，這是最簡單的，想直接寫窗體就得多寫幾行代碼了，具體搜索一下
vb.net 打印功能
可以把數(shù)據(jù)導(dǎo)出到EXCEL，然后使用EXCEL進(jìn)一步處理后使用。
也可以做成vb報(bào)表(VB自帶有)。
先設(shè)置報(bào)表格式，打印時(shí)向報(bào)表傳遞數(shù)據(jù)就可以了。
如何用VB.NET打印當(dāng)前窗體？？
讓你的窗體獲得焦點(diǎn)
按住ALT 再按 PRINT SCREEN SYSRQ
保存成圖片 打印圖片
高分求解vb.net 打印的問題
報(bào)表打印應(yīng)該也能實(shí)現(xiàn)，但是我覺得你這個(gè)用文本打印更簡單，將數(shù)據(jù)輸出到txt文件，結(jié)果用RichTextBox顯示，但是需要簡單的排版，調(diào)用打印機(jī)打印RichTextBox即可的
排版用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 '頁面設(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
網(wǎng)站名稱：vb.net窗體打印,vb單擊窗體怎樣打印出文字
網(wǎng)頁URL：http://www.dlmjj.cn/article/phijog.html
