读书人

datagridview 内容打印,该怎么解决

发布时间: 2011-12-27 22:22:55 作者: rapoo

datagridview 内容打印
有没有简单点的能打印 datagridview 里的数据的?

[解决办法]
你可真有福气,我刚写了一个,在我的博客里,这几天我就为这事忙
[解决办法]
多功能DataGridView打印类(WinForm C#)
[解决办法]
第三个e.graphics是打印机里面画图

[解决办法]
路过,学习
[解决办法]
1. For Each ob As Control In Me.SplitContainer1.Panel2.Controls 'Me.SplitContainer1.Panel2.Controls 所指的是什么容器??
If TypeOf (ob) Is TextBox Then......

2. For indexCol = 0 To DataGrid.Columns.Count - 1 'DataGrid.Columns.Count - 1 - DataGrid 是不是 datagridview ???

3. e.Graphics.DrawString(strValue, DataGrid.Font, Brushes.Black, rect, StrFormat) 'e.Graphics 这不明白请帮忙解释

答复:
1.'Me.SplitContainer1.Panel2.Controls 不是容器,容器是 Me.SplitContainer1.Panel2,Me.SplitContainer1本身是个控件 ,当然 你也可以用其他控件,如放到groupbox也可以

2.datagrid是一个变量 ,就是datagridview 类型的

3.e 是printpage事件里面 的一个 System.Drawing.Printing.PrintPageEventArgs参数
[解决办法]

VB.NET code
'添加引用Imports System.Drawing.PrintingImports System.Drawing.ColorImports System.Windows.FormsImports System.Drawing.FontImports System.Drawing.PointFImports System.Windows.Forms.DataGridImports System.Drawing.PenImports System.Drawing
[解决办法]
.e 是printpage事件里面 的一个 System.Drawing.Printing.PrintPageEventArgs参数
定义 byval e as System.Drawing.Printing.PrintPageEventArgs 是不是这里面的你 写错了
[解决办法]
Private Sub Print(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs)

'groundsky 的打印代码

End Sub

'---------------
调用:

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

Dim prnt As New Printing.PrintDocument
prnt.DocumentName = "打印表格"
AddHandler prnt.PrintPage, AddressOf Print
prnt.Print()

End Sub

[解决办法]
学习中,水晶报表可以对他里面的TEXTOBJECT编程么?
[解决办法]
Private Sub Print(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs)

'groundsky 的打印代码

End Sub
=====================
程序代码放到中
'打印主代码
Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

end sub

读书人网 >VB Dotnet

热点推荐