精简代码实现datagridView 表格打印
2009-02-12 22:16
323 查看
'====打印 表格前 内容==== '打印文本框内容 For Each ob As Control In Me.SplitContainer1.Panel2.Controls If TypeOf (ob) Is TextBox Then e.Graphics.DrawString(ob.Text, ob.Font, Brushes.Black, ob.Bounds.X, ob.Bounds.Y) End If Next Dim StrFormat As New StringFormat With StrFormat .LineAlignment = StringAlignment.Center .Alignment = StringAlignment.Center .Trimming = StringTrimming.None End With '=====打印表格标题行 Dim rect As New Rectangle Dim strValue As String Dim indexCol As Integer Dim colWidth As Integer = 0 For indexCol = 0 To datagrid.Columns.Count - 1 'If datagrid.Columns(indexCol).HeaderCell.Value Is DBNull.Value Then Continue For strValue = datagrid.Columns(indexCol).HeaderText rect = New Rectangle(datagrid.RowHeadersWidth, 0, datagrid.Columns(indexCol).Width, datagrid.ColumnHeadersHeight) rect.Offset(datagrid.Location + New Point(colWidth, 0)) colWidth += datagrid.Columns(indexCol).Width e.Graphics.DrawRectangle(Pens.Black, rect) e.Graphics.DrawString(strValue, datagrid.Font, Brushes.Black, rect, StrFormat) Next '====打印表格以及内容 Dim irow As Integer : Dim icol As Integer '+ New Point(0, datagrid.ColumnHeadersHeight) strValue = "" For irow = 0 To datagrid.Rows.Count - 1 For icol = 0 To datagrid.Columns.Count - 1 rect = datagrid.GetCellDisplayRectangle(icol, irow, False) rect.Offset(datagrid.Location) e.Graphics.DrawRectangle(Pens.Black, rect) If datagrid.Rows(irow).Cells(icol).Value Is DBNull.Value Then strValue = "" Else strValue = datagrid.Rows(irow).Cells(icol).FormattedValue End If e.Graphics.DrawString(strValue, datagrid.Font, Brushes.Black, rect, StrFormat) Next Next
看了其他一些代码,感觉比较繁琐,花了1整天功夫,经过不断测试,终于可以以简便的方式 实现datagridview绘制了实现后可以 按照表格实际式样以及大小进行打印了
相关文章推荐
- 精简代码实现datagridView 表格打印
- c#通过Word实现打印的代码(表格为例)
- Html表格代码实现打印
- C#编码中,打印预览DataGridView的一段代码,稍作了修改,可以实现。
- winfrom 打印表格 字符串的封装实现代码 附源码下载
- 2.使用线程实现数字与代码的交替打印
- 基于jquery实现的表格分页实现代码
- 表格内容可伸缩代码实现
- 代码实现打印功能(asp.net+javascript)
- DataGridView完整实现打印功能
- 基于JavaScript代码实现自动生成表格
- JS封装的自动创建表格的实现代码
- C++中实现把表的数据导出到EXCEL并打印实例代码
- 如何实现用DataGridView来做统计表格
- 用表格输出1-1000之间的数字实现代码(附特效)
- JS小功能(操作Table--动态添加删除表格及数据)实现代码
- DataGridView中绑定DataTable数据及相关操作实现代码
- iOS自动生成表格效果的实现代码
- 实现 java 执行 cmd 命令,打印输出,等待cmd 完全执行完成后才执行下面代码 .
- 用php代码实现数据库的链接,创建表格等