VB.net中实现打印窗体

最新推荐文章于 2021-09-03 14:26:07 发布
最新推荐文章于 2021-09-03 14:26:07 发布
阅读量6.5k 收藏 2
点赞数
文章标签： vb.net integer function structure button user
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/ebaoji/article/details/965714
版权
本文介绍了如何在VB.NET中实现窗体的打印功能，通过导入System.Drawing.Printing和使用GDI+的相关函数，捕获窗体图像并将其发送到打印机。内容包括定义BitBlt、GetWindowDC等函数，创建Bitmap对象，以及在Button点击事件中触发打印操作。
摘要由CSDN通过智能技术生成

Imports System
Imports System.Drawing.Printing

Public Class Form1

    <System.Runtime.InteropServices.DllImport("gdi32.dll")> _
   Public Shared Function BitBlt(ByVal hdcDest As IntPtr, ByVal nXDest As Integer, ByVal nYDest As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal hdcSrc As IntPtr, ByVal nXSrc As Integer, ByVal nYSrc As Integer, ByVal dwRop As Integer) As Boolean
    End Function
    <System.Runtime.InteropServices.DllImport("User32.dll")> _
    Public Shared Function GetWindowDC(ByVal hwd As IntPtr) As IntPtr
    End Function

    &

最低0.47元/天 解锁文章
ebaoji
关注
  • 0
    点赞
  • 踩
  • 2
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
VB.Net 操作打印机
wzy87au的专栏
04-08 4021
首先创建一个打印机类,继承PrintDocument.重写OnBeginPrint 方法, 和 OnPrintPage方法.     ' 使用VB.net操作打印机     ImportsSystem.Drawing.Printing ImportsSystem.IO ImportsBarcodeLib     PublicClassTextFilePrintDocume
vb.net 打印html文件,VB.net中实现打印窗体
weixin_39612653的博客
06-17 638
示例Private Declare Function BitBlt Lib "gdi32.dll" Alias "BitBlt" (ByVal _hdcDest As IntPtr,ByVal nXDest As Integer,ByVal nYDest As _Integer,ByVal nWidth As Integer,ByVal nHeight As Integer,ByVal _hdcS...
VB.net实现打印的简单方法
07-14
VB.net实现打印的简单方法
VB.net使用PrintForm打印窗体
Dexter's Laboratory
05-27 5160
在VS2010中内置了了一个PowerPacks的扩展包,果然很好用啊,可以直接打印窗体内容 先从"工具箱"中拖一个PrintForm到设计好的窗体中 然后在窗体里加了个打印的按钮,对应代码如下     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
vb.net 教程 3-6 窗体编程 打印
chinaherolts2008的博客
09-03 737
版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。 考虑到打印部分的内容本身涉及比较多，打印组件只是其中一个方面，同时还涉及到图像、文件的知识，所以把打印单独写一章。 vb.net在工具栏提供的打印组件包括： PrintDocument、PageSetupDialog、PrintDialog、PrintPreviewDialog、PrintPreviewControl 其中最重要的是PrintDocument，提供了真正打印的方法，其他的都是设置
VB.NET中的Windows窗体屏幕截图和打印预览
04-01
在VB.NET中，开发Windows应用程序时，我们可能会遇到需要对窗体进行屏幕截图并实现打印预览的功能。本文将深入探讨这两个关键知识点，并提供相关的实现方法。 首先，让我们讨论如何在VB.NET中获取Windows窗体的屏幕...
VB.NETWindowsFormsSimplePrinting.rar_.net_vb 打印_vb.net_vb.net 打印
09-14
在.NET框架中，VB.NET（Visual Basic .NET）是一种面向对象的编程语言，它提供了丰富的功能，包括对Windows桌面应用程序...学习并理解这些示例，可以帮助开发者快速掌握在Windows Forms应用程序中实现打印的基本步骤。
vb.net 打印及打印预览
06-23
vb.net 打印及打印预览源码示例
VB.net打印RichTextBox中内容
11-18
可以很方便的打印普通单一窗体中指定richtextbox中的内容，而不需要设置当前子窗体。 只需要在当前窗体中添加打印组件printdocument然后修改一下要打印的标题和richtextbox的控件名就OK
免费DataGridView打印及.NET轻松打印控件5.5版（VB打印，C#打印）
02-08
本DataGridView打印控件和.NET打印控件5.5版（含报表模板设计组件）2014年2月8日修改完成，完全免费，在.NET2.0及以上环境下都可以使用（VB打印、C#打印都是可以的），有帮助文档与使用实例。 与上一版本的5.4版相比，新控件5.5版的主要更改如下： 1、对控件进行了完善，DGVPrint、VB2008Print、EasyReport组件的打印预览速度有较大的提升； 2、VB2008Print与EasyReport添加了二维码打印的功能，该功能使用开源的Zxing.NET实现； 3、添加了DrawDGVEx函数，一方面可以以DGVprint对象中的参数在VB2008Print组件中打印，另一方面提供了并排打印多个表格的重载函数； 4、DGVPrint组件添加了报表头与报表尾内容的设置属性和参数； 5、DGVPrint与VB2008Print组件在以工资条方式打印表格时，添加了是否自动换行续打的功能（即，如果工资条列太多在一行中打印不下时，可以指定自动换行续打）； 6、修改了EasyReport组件的设计界面，每个区域的属性放在属性窗口中显示； 7、EasyReport组件添加了简单的多栏打印支持功能； 8、VB2008Print组件添加了PrintDGVFixedWidth函数，方便将DataGridView按指定宽度进行打印； 9、去掉了网页打印功能（因为在IE11下没法使用，所以干脆去掉），去掉了打印RDLC报表的功能； 10、其他一些完善，比如在导出Excel时，如果Columheader不可见，则不导出；解决了快速导出Excel时部分特殊列没有表格线问题（比如是数值列，但使用了%等格式）；VB2008Print组件添加了PageScale可以指定打印时的缩放比例等等。 本控件特色： 1、强大的DataGridView打印功能，不仅可以以多种形式（普通打印、分栏打印、跨页打印、工资条打印）打印DGV表格，基本上能完全按DGV控件本身设置的格式如字体、字号、背景颜色、前景颜色、单元格对齐方式等打印出来，文字图像都可以打印，而且是完全根据表格当前的显示顺序进行打印的，基本上做到了所见即所得的打印。 2、报表设计功能。报表模板设计组件EasyReport与WebEasyReport组件可以设计普通报表、分组报表、套打模板等，分别以DataGridView为数据源。控件的位置以毫米为计量单位，定位准确，很适合套打单据设计。 3、强大的图表打印功能。5.2版控件新增了一个Chartlet的组件，使用非常方便，可以生成柱形图、饼图、折线图等多种图形，而且可以设置2D或3D效果，既可以在打印控件中打印出来，也可以在Graphics对象中显示。 4、分组汇总打印DataGridVeiw功能，每组还可以自动换新页打印，还可以自动增加行号。 5、强大的文本打印输出功能，控件提供多个文本打印重载函数，打印文本时，如果需要，控件会自动换行和换页打印输出。还增加了以指定行间距及字符间距打印文本的功能，可以用固定行距，也可以用单倍或多倍行距打印文本。 6、强大的绘图功能，基本上.NET的GDI+的绘图函数(如直线、矩形、路径、多边形、曲线等)都有，只有个别函数的名称有点区别。 7、支持同一文档多种版面格式打印（类似于Word中的节的功能）：对同一份文档，不同的页面可以设置不同的格式（纸张大小、纸张方向、页边 距），只需要在新增一页时在NewPage方法中指定要使用的页面格式即可，使用非常简单。 8、报表文件保存功能。本控件允许将当前打印预览的内容保存为报表文件，以后使用本控件重新打开该报表文件即可重现原来保存报表时的打印内容。 9、Excel导出功能，可以将DataGridView和GridView导出为Excel文件，5.2版控件还增加了不依赖Office的导出Excel功能，而且速度非常快，5.4版还增加了合并单元格的导出功能。 10、打印DataGridView时的打印方案保存与读取功能。可以将当前打印参数保存为打印方案文件，或者从保存的打印方案文件中读取打印参数。 11、水印打印功能。根据需要，可以在页面中打印或不打印以半透明空心文字打印水印。 12、强大的容器控件打印功能(DrawPanel函数)。借助该函数，您只需要在您的容器控件中设计好要打印的内容及打印内容的相对位置，控件轻松帮你打印出来(如果超过一页，控件会自动换页续打)。 13、特殊文字效果打印功能。控件具有打印浮雕文字、阴影文字、空心文字、块文字的功能。 14、页眉页脚中既可打印文字，也可打印图像，或者即打印图像又打印输出文字。 15、图像与图标打印输出功能。 16、多表头（跨行跨列的复杂表头）打印功能，多表头组件支持多表头显示与打印、单元格内容的合并显示、打印与导出。 17、自定义纸张支持功能。 18、纸张背景图片设置打印功能。 19、.NET4.0支持功能(是单独的一个文件) 20、直接打印窗口中的TreeView控件功能 21、打印窗口中的ListView功能。 22、RichTextBox控件的RTF文本打印功能。 23、斜线表头打印功能（5.4版新增）。 24、二维码打印功能（5.5版本增加）。 我将持续改进该控件，并将不断推出控件的新版本，要查看或下载控件的升级版本，请登陆网站：http://myyouping.download.csdn.net/ 。具体使用方法请参见帮助文件与实例文件，如有疑问或好的建议，请与我联系： 邮箱：myyouping@139.com Q Q：479781502
vb 用PrintWindow函数后台截图或被遮住控件
08-19
用PrintWindow函数快速截图并保存，可以截图后台或被遮住控件 最小化的话就只能截到一小块标行务栏标题一样了。 先打开一个记事本，输一些内容进去然后就可以开始截图了，软件会把记事本窗体与内容一起截下来
打印窗体文本程序,举例说明,打印预览,打印,数据库的连接等(VB6.0源代码编写)
12-19
打印窗体文本程序,举例说明,打印预览,打印,数据库的连接等(VB6.0源代码编写)
VB.NET二维码生成和打印实例
03-23
在VB.NET中生成和打印二维码是一项常见的任务，特别是在自动化生产和物流管理中。本文将深入探讨如何使用VB.NET来实现这一功能，以及相关的技术点。 首先，我们要了解二维码（QR Code）是一种二维条形码，可以存储...
[VB.NET]vb中很容易实现的打印机设置窗口，在vb.net中如何实现？烦恼中！
VB.NET学习网-VB.NET实例、VB.NET教程、VB.NET源码下载
12-28 1010
<!--google_ad_client = "pub-8333940862668978";/* 728x90, 创建于 08-11-30 */google_ad_slot = "4485230109";google_ad_width = 728;google_ad_height = 90;//--><script type="text/javascript"
vb.net 教程 11-1 打印组件 4 PrintDocument 3
UruseiBest 的技术专栏
06-13 2295
版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。 接上一节的内容，继续谈谈PrintDocument使用时一些细节 本节谈谈如何多页打印。 在 vb.net 教程 11-1 打印组件 PrintDocument 1一节中讲到了 PrintDocument有个HasMorePages属性，它指示是否还要继续打印。 那么多页打印就是要使用...
VB.net 自定义纸张打印程序
最新发布
05-25
在 VB.net 中，可以使用 PrintDocument 控件来实现自定义纸张打印程序。下面给出一个简单的示例代码，以帮助你入门： 1. 创建一个新的 VB.net 项目，并在窗体上放置一个 PrintDocument 控件。 2. 在窗体的 Load 事件中添加以下代码： ```vb Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load ' 设置纸张大小和边距 PrintDocument1.DefaultPageSettings.PaperSize = New PaperSize("Custom", 500, 700) PrintDocument1.DefaultPageSettings.Margins = New Margins(50, 50, 50, 50) End Sub ``` 这里我们设置纸张大小为 500x700，边距为 50。 3. 在窗体上添加一个按钮，并在按钮的 Click 事件中添加以下代码： ```vb Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click ' 打印文本 Dim printText As String = "Hello, world!" PrintDocument1.Print() End Sub ``` 这里我们将要打印的文本保存在一个字符串变量中，然后调用 PrintDocument 控件的 Print 方法来实现打印。 4. 最后在 PrintDocument 控件的 PrintPage 事件中添加以下代码： ```vb Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage ' 获得纸张大小和边距 Dim pageSize As Size = e.PageSettings.PrintableArea.Size Dim margins As Margins = e.PageSettings.Margins ' 绘制文本 Dim printFont As New Font("Arial", 12) Dim printBrush As New SolidBrush(Color.Black) Dim printRect As New RectangleF(margins.Left, margins.Top, pageSize.Width - margins.Left - margins.Right, pageSize.Height - margins.Top - margins.Bottom) e.Graphics.DrawString(printText, printFont, printBrush, printRect) ' 设置 HasMorePages 属性为 False，表示打印完成 e.HasMorePages = False End Sub ``` 在 PrintPage 事件中，我们可以获得纸张大小和边距，并使用 Graphics 对象绘制文本。最后要注意设置 HasMorePages 属性为 False，表示打印完成。 以上就是一个简单的 VB.net 自定义纸张打印程序的实现。你可以根据自己的需求来修改纸张大小、边距、字体等参数，实现更复杂的打印功能。
评论 1
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值