vb.net打印窗体,vb编写打印功能

如何用VB.NET打印当前窗体？？

让你的窗体获得焦点

按住ALT 再按 PRINT SCREEN SYSRQ

保存成图片 打印图片

相关问答

Q1: vb.net 怎么实现发票打印窗体，按窗体上的格式打印出来，用的是access数据库，请高手帮忙！

选择开始菜单中→程序→【Management SQL Server 2008】→【SQL Server Management Studio】命令，打开【SQL Server Management Studio】窗口，并使用Windows或 SQL Server身份验证建立连接。

在【对象资源管理器】窗口中展开服务器，然后选择【数据库】节点

右键单击【数据库】节点，从弹出来的快捷菜单中选择【新建数据库】命令。

执行上述操作后，会弹出【新建数据库】对话框。在对话框、左侧有3个选项，分别是【常规】、【选项】和【文件组】。完成这三个选项中的设置会后，就完成了数据库的创建工作，

在【数据库名称】文本框中输入要新建数据库的名称。例如，这里以“新建的数据库”。

在【所有者】文本框中输入新建数据库的所有者，如sa。根据数据库的使用情况，选择启用或者禁用【使用全文索引】复选框。

在【数据库文件】列表中包括两行，一行是数据库文件，而另一行是日记文件。通过单击下面的【添加】、【删除】按钮添加或删除数据库文件。

切换到【选项页】、在这里可以设置数据库的排序规则、恢复模式、兼容级别和其他属性。

切换到【文件组】页，在这里可以添加或删除文件组。

完成以上操作后，单击【确定】按钮关闭【新建数据库】对话框。至此“新建的数据”数据库创建成功。新建的数据库可以再【对象资源管理器】窗口看到。

Q2: 怎样用热敏打印机把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

Q3: 在vb.net 里面，如何打印当前窗口

有截屏键Ctrl + Alt + prtScr/sysRq(prtScr/sysRq在F12旁边)，再打开画图、WORD等粘贴就行了

Q4: VB打印窗体

LZ:

PrintForm 方法

用以将 Form 对象的图象逐位发送给打印机。

应该不会出现打印出来的全是英文的现象.

上述连接有Printer对象的相关代码.

答复补充:

Open "Lpt1" For Output As #1

Str=”欢迎使用GP系列票据打印机!”+Chr(10)

Print #1, Str

Close #1

此种方法在WIN9X系统能正常打印汉字,在WINXP系统不支持打印汉字.

可参阅:

求采纳为满意回答。