vb.net小票打印代码（winform打印小票）

今天给各位分享vb.net小票打印代码的知识，其中也会对winform打印小票进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、VB打印的代码如下图
• 2、高分求解vb.net 打印的问题
• 3、怎样用热敏打印机把vb.net窗体内文本框内容打印出来
• 4、VB.net 我买了一个超市用的热敏打印机，现在想打印一些小票。我想知道如何把textbox的内容打印出来。
• 5、C# 或者 vb.net 打印listview里的内容（小票打印机）

VB打印的代码如下图

用VB可以直接使用对象 Printer 进行数据及图片的打印。

如：

'***初始化打印机

Printer.ScaleMode = 1

Printer.FontName = "仿宋_GB2312"

Printer.FontSize = 8

Printer.FontBold = False

'设置打印区域,四个 参数分别是打印区域的左上角及右下角坐标

' 这里以 A4 打印纸张大小为例，边框距各为2cm.

PrtLeftx=567*2

PrtLefty=567*2.0

PrtRightx=567*(21-2)

PrtLefty=567*(29.5-2)

'**打印线条

Printer.DrawWidth = 2

Printer.Line (PrtLeftx, PrtLefty)-(PrtRightx, PrtLefty)

Printer.DrawWidth = 1

' 打印字符串

Printer.Print "中国 China"

要打印窗体中TextBox 中的内容，将其赋给变量或直接打印都可以。

高分求解vb.net 打印的问题

报表打印应该也能实现，但是我觉得你这个用文本打印更简单，将数据输出到txt文件，结果用RichTextBox显示，但是需要简单的排版，调用打印机打印RichTextBox即可的

排版用tab（）、space（）、vbcrlf或PrintLine(1)换行，代码类似如下样式

PrintLine(1, TAB(60), "准考证" )

PrintLine(1)

PrintLine(1, "姓名:" xingming Space(3) "准考证号：" cel(1) Space(3) cel(2) Space(3) cel(3))

但是TAB()排版比较规整

打印代码类似如下：

PrintDialog1.Document = PrintDocument1

PrintDocument1.DocumentName = "准考证"

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 '页面设置

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

If PrintDialog1.PrinterSettings.IsValid = True Then

PrintDocument1.Print()

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

Else

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

End If

Else

Exit Sub

End If

End If

怎样用热敏打印机把vb.net窗体内文本框内容打印出来

用PrintForm控件，在Visual Basic PowerPacks项目列表中vb2008 SP1以后版本就有了，下面是代码

Imports System.Drawing.Printing

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

'先设置打印页面的页边距

With Me.PrintForm1

Dim myMargins As New Margins '页边距设置信息是存放在这个Margins类型的对象中的

With myMargins '分别设置上下左右边距,

.Left = 12

.Right = 12

.Top = 12

.Bottom = 12

End With

.PrinterSettings.DefaultPageSettings.Margins = myMargins '把myMargins对象赋给PrintForm1的设置属性

End With

Me.Button1.Visible = False '这个是在打印的时候隐藏打印按钮

Me.PrintForm1.Form = Me '设置要打印的窗体

Me.PrintForm1.Print() '调用打印窗体方法

Me.Button1.Visible = True '再把隐藏的打印按钮显示出来

End Sub

VB.net 我买了一个超市用的热敏打印机，现在想打印一些小票。我想知道如何把textbox的内容打印出来。

1、热敏打印机（超市打印小票的那种）其实和办公用的打印机没有根本区别，只是用途不同罢了。

2、热敏打印机与计算机连接的接口基本上有3种（并口、串口和USB口），不管哪种，都要把那个连接线与计算机背后的插槽连好（接口是对应好了的，搞错了是接不上的），然后安装正确打印机驱动程序。

3、在大家熟悉使用的WORD文字编辑程序程序中，讲页面宽度自定义调整为热敏纸的规格，页面长度一般210毫米就够用了。记得要把这个保存为模板，方便以后调用此格式。

4、好了，就用上面的那个模板随便编辑内容，发送打印任务到热敏机就行啦。试试吧，字符再长在WORD里都会自动换行滴。

C# 或者 vb.net 打印listview里的内容（小票打印机）

foreach (ListViewItem item in listView1.Items) {

Debug.Print(item.Text);

}

vb.net小票打印代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于winform打印小票、vb.net小票打印代码的信息别忘了在本站进行查找喔。