vb.net打印内容 vbnet printdocument

VB.NET 打印问题。

先拖过来控件PrintDocument1，然后双击PrintDocument1，在它的PrintPage事件中加入代码如下：

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

dim a as String

a="abcd"

Dim mypen As Pen = New Pen(Color.Blue, 2)

e.Graphics.DrawString(a, New Font("宋体", 20), New Pen(Color.Black, 1).Brush, 30, 30)

End Sub

调用下面语句可直接用默认打印机打印出来：

PrintDocument1.Print()

vb.net 打印功能

可以把数据导出到EXCEL，然后使用EXCEL进一步处理后使用。

也可以做成vb报表(VB自带有)。

先设置报表格式，打印时向报表传递数据就可以了。

vb.net如何实现打印DataGridView1里的内容，求源码

使用 PrintDocument 控件的 Print() 方法可以打印指定对象中的内容，参考代码如下：

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

    PrintDocument1.Print()

End Sub

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

    Dim bm As New Bitmap(Me.DataGridView1.Width, Me.DataGridView1.Height)

    DataGridView1.DrawToBitmap(bm, New Rectangle(0, 0, Me.DataGridView1.Width, Me.DataGridView1.Height))

    e.Graphics.DrawImage(bm, 0, 0)

End Sub

vb.net怎么打印执行代码行数

如何在VB.net中的应用程序运行打印行数

[英] how to print out line number during application run in VB.net

查看：341 发布时间：2015/11/25 16:05:39 .net vb.net debugging stack-trace line-numbers

万维广告联盟

🔐 杜绝删库跑路。一个平台登录所有资产vb.net打印内容，实现事先防范、事中控制、事后溯源vb.net打印内容，满足等保合规要求。

广告

本文介绍了如何在VB.net中的应用程序运行打印行数的处理方法vb.net打印内容，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！

问题描述

我想打印出我的调试消息，在VB.net应用程序的行号。 我不喜欢这样，

Dim st As StackTrace

Dim sf As StackFramee

st = New StackTrace(New StackFrame(True))

sf = st.GetFrame(0)

Console.WriteLine.("Line " sf.GetFileLineNumber()）

我想把片段的一类，每次我打电话logMsg方法来记录我的消息，行号源$ C $ C。 但我发现，如果我把上面的代码段为一类，行数总是相同的，这是我新的'圣'。行

的功能是完全一样的具有_ 行的宏C ++。其实我是C ++程序员。

反正来解决这个问题？谢谢。

推荐答案

您已经证明是工作完全按预期的code。它打印在您拍摄的堆栈帧行的数目。因为你已经在不同的类中定义它，它打印包含类文件的行号。

在的getFrame 方法，在这里是非常重要的。栈帧起始编号是0，这是的最后的堆栈帧推。因此，参考帧0，则指示打印的最后的堆栈被推帧的行数的运行时间。当一个方法调用另一个，一个新的堆栈帧创建。

相反，你需要改变你的方法在几个重要方面。首先，你需要获得的第一个的框架被压入堆栈。第二，你可能要接受有关您回应异常含参数的信息。尝试重写你的调试方法看起来是这样的：

Public Sub PrintCurrentLine(ByVal ex As Exception)

Dim st As StackTrace = New StackTrace(ex)

Dim sf As StackFrame = st.GetFrame(st.FrameCount - 1)

Console.WriteLine("Line " sf.GetFileLineNumber())

End Sub

还要记住，如果你正在运行的code与优化启用，像行号可能已经改变。你总是需要包括PDB文件与您的code，它包含调试用于在这样的情况的信息。它映射优化code回到原来的来源。

这篇关于如何在VB.net中的应用程序运行打印行数的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！

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