锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net打印预览控件 vb如何实现打印( 二 )

IT技术控件


代码如下：
====================================================
Public Class Form1
'定义相关变量
Private ppdlog1 As New printPreviewDialog'预览控件
Private mytoolstrip1 As New ToolStrip
Private WithEvents myButton1 As New ToolStripButton '新按钮
'------------------创建新按钮的过程
Private Sub CreatemyButton()
Dim c1 As Control
For Each c1 In ppdlog1.Controls
If TypeName(c1) = "ToolStrip" Then
mytoolstrip1 = c1
End If
Next
myButton1.Text = "新按钮"
mytoolstrip1.Items.Add(myButton1)
End Sub
'-----------------------
'在Sub New()中调用如下：
'--------------------------------------------
Public Sub New()
' 此调用是设计器所必需的 。
' 在 InitializeComponent() 调用之后添加任何初始化 。
CreatemyButton()'创建“新按钮”的过程
End Sub
'----------------------------------------------------
'myButton1的Click过程
'===================
Private Sub myButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("新按钮创建成功vb.net打印预览控件！")
'//执行代码.......
End Sub
'===================
'测试一下：
'----------------
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ppdlog1.Document = PrintDocument1
ppdlog1.ShowDialog()
End Sub
'----------------
End Class
==================================================
效果如图：
关于vb.net打印预览控件和vb如何实现打印的介绍到此就结束了 ， 不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

推荐阅读


上一篇：我们的电视怎么没有啊，我们的电视怎么没有啊英语

下一篇：竞技游戏怎么下载手机版，竞技游戏在线玩