VB.NET 代码变更datagridview字体大小

时间: 2024-05-02 17:01:54 浏览: 108

VB2005.NET打印DataGridview中的数据

5星 · 资源好评率100%

### VB2005.NET打印DataGridview中的数据在Visual Basic .NET（简称VB.NET）开发环境中，经常需要处理各种报表打印需求。对于DataGridview控件中的数据进行打印是一项常见任务。本文将详细介绍如何在VB.NET中实现DataGridview的打印功能。 #### 基本思路实现DataGridview的打印功能主要分为两步： 1. **创建打印类**：定义一个专门用于打印DataGridview数据的类。 2. **调用打印类**：在程序中实例化打印类，并传入需要打印的DataGridview对象及打印标题。 #### 创建打印类我们需要在Visual Studio中创建一个名为`DgPrint`的类。该类的主要功能是将DataGridview中的数据转换成可以打印的形式，并支持打印预览。 ```vb Imports System.Collections.Generic Imports System.Windows.Forms Imports System.Drawing Imports System.Collections Imports System.Data Imports System.Text Namespace DgPrint Public Class PrintService Private StrFormat As StringFormat '单元格内容格式 Private RowPos As Integer '当前打印行位置 Private NewPage As Boolean '是否为新页 Private PageNo As Integer '打印页数 Private CellHeight As Integer '打印的单元格高度 Private RowsPerPage As Integer '每页的行数 Private printDoc As New System.Drawing.Printing.PrintDocument() '用于打印的PrintDocument对象 Private ColumnLefts As New ArrayList() '列的左坐标 Private ColumnWidths As New ArrayList() '列的宽度 Private PrintTitle As String = "" '标题 Private AvailableColumns As New List(Of String)() 'DataGridview中可见的列 Private HeaderHeight As Integer = 0 Private grid As DataGridView '打印方法 Public Sub Print(ByVal grid As DataGridView, ByVal Title As String) Dim ppvw As PrintPreviewDialog Try Me.grid = grid '获取要打印的DataGridview AvailableColumns.Clear() '清空可用列列表 '获取DataGridview中所有可见的列标题 For Each c As DataGridViewColumn In grid.Columns If c.Visible Then AvailableColumns.Add(c.HeaderText) End If Next '设置打印属性对话框 PrintTitle = Title RowsPerPage = 0 printDoc.DocumentName = "" Dim dia As New PrintDialog() dia.PrintToFile = False dia.Document = printDoc dia.UseEXDialog = True If dia.ShowDialog() <> DialogResult.OK Then Return End If ppvw = New PrintPreviewDialog() ppvw.WindowState = FormWindowState.Maximized ppvw.Document = printDoc '设置打印预览对话框 AddHandler printDoc.BeginPrint, AddressOf PrintGridDoc_BeginPrint AddHandler printDoc.PrintPage, AddressOf PrintGridDoc_PrintPage If ppvw.ShowDialog() <> DialogResult.OK Then RemoveHandler printDoc.BeginPrint, AddressOf PrintGridDoc_BeginPrint RemoveHandler printDoc.PrintPage, AddressOf PrintGridDoc_PrintPage Return End If '实际打印操作 printDoc.Print() RemoveHandler printDoc.BeginPrint, AddressOf PrintGridDoc_BeginPrint RemoveHandler printDoc.PrintPage, AddressOf PrintGridDoc_PrintPage Catch ex As Exception MessageBox.Show("打印时发生错误：" & ex.Message) End Try End Sub 'BeginPrint事件处理程序 Private Sub PrintGridDoc_BeginPrint(sender As Object, e As PrintEventArgs) '初始化打印参数 NewPage = True PageNo = 1 RowPos = 0 CellHeight = 0 RowsPerPage = 0 HeaderHeight = 0 '计算每页的行数 RowsPerPage = (printDoc.DefaultPageSettings.PaperSize.Height - HeaderHeight) / CellHeight End Sub 'PrintPage事件处理程序 Private Sub PrintGridDoc_PrintPage(sender As Object, e As PrintPageEventArgs) '打印逻辑 '... End Sub End Class End Namespace ``` #### 调用打印类在需要打印的地方，我们可以创建一个`PrintService`对象，并通过调用`Print`方法来实现打印： ```vb Dim DgvPrint As New DgPrint.PrintService DgvPrint.Print(DataGridView1, "打印文档的标题") ``` 这里`DataGridView1`是我们希望打印的DataGridview对象。 #### 总结通过上述步骤，我们已经成功实现了在VB.NET中打印DataGridview的功能。此方法不仅简单易懂，而且非常实用。开发者可以根据具体需求进一步扩展和完善打印类的功能，比如添加自定义样式、支持多页打印等高级特性。

要更改 DataGridView 中的字体大小，您可以使用以下代码： ``` DataGridView1.DefaultCellStyle.Font = New Font("Arial", 12) ``` 在此示例中，字体设置为 Arial，大小为 12。您可以根据需要更改字体和大小。此代码应在 DataGridView 加载之前或在绑定到数据源之后运行。

阅读全文

VB.NET 代码 变更datagridview字体大小

相关推荐

VB.NET中Datagridview的打印方法

VB.NET DataGridView深度解析与实战技巧

vb.net如何打印dataGridview中的数据

vb.net中把datagridview的数据保存到excle

vb.net2008 winform DataGridView单元格合并和二维表头

VB.NET 中删除DataGridView中所选行的小例子

Vb.net下的DataGridView的数据合并、多行列头

vb.net 2005 中DataGridView 控件的重要开发技巧(事例)

VB.NET 代码 datagridview 单元格颜色变更

VB.NET 代码 datagridview右键显示菜单

VB.NET如何实现DATAGRIDVIEW遍历所有行并删除

VB.NET如何设置DATAGRIDVIEW的左右上下滚动条

VB.NET 代码 datagridview 获得指定字段名的列号

vb.net 自动调整DataGridView表格列每列宽度,每行注释

vb.net DataGridView根据字体大小自动调整行高,每行代码后面带注释

VB.NET DataGridView.zip_C93I_datagridview_nce_vb.net_vb.net Data

vb.net & C#.net DataGridView使用说明

vb.net清空DataGridView1

vb.net中datagridview如何用

最新推荐

在vb.net下实现的打印datagridview的类 源代码

VB.net调用Access数据库

vb.net & C#.net DataGridView使用说明

Python 查看主机IP及mac地址

MATLAB实现小波阈值去噪：Visushrink硬软算法对比

管理建模和仿真的文件

【交互特征的影响】：分类问题中的深入探讨，如何正确应用交互特征

c语言从链式队列 中获取头部元素并返回其状态的函数怎么写

易语言实现画板图像缩放功能教程

"互动学习：行动中的多样性与论文攻读经历"

VB.NET 代码变更datagridview字体大小

在vb.net下实现的打印datagridview的类源代码

c语言从链式队列中获取头部元素并返回其状态的函数怎么写