VB.NET程序如何实现表格填写和打印

一般情况下先用EXCEL做好一个样表文件，设定好打印区域和样式，需要填内容的时候，先程序复制一个样表文件，然后调用API打开表格填写内容并打印，如果想用API来实现调整模板和打印预览，可能比较困难，而且很抽象，个人觉得费时费力效果还不一定理想

创新互联：2013年至今为各行业开拓出企业自己的“网站建设”服务，为数千家公司企业提供了专业的成都网站设计、网站建设、网页设计和网站推广服务， 按需求定制设计由设计师亲自精心设计，设计的效果完全按照客户的要求，并适当的提出合理的建议，拥有的视觉效果，策划师分析客户的同行竞争对手，根据客户的实际情况给出合理的网站构架，制作客户同行业具有领先地位的。

VB.NET打印编程问题，打印机为激光打印机。

打印做得不多，以前做套打时发现，每台打印机定位都不一样，于是每台机子都加了个偏移设置

我的做法在白纸上打上一标尺，和一个上下边距为2CM的交叉点，然后用标尺量这2CM的偏移，设置完后，在这台打印机打印时，就给纸张加个偏移量，打印就正常了。可能你的原因和我一样。

另外也想问你一下，你这个条码是用什么打的。早先，我用立象的条码打印机打不干胶，很简单，激光打没用过，可能下次我也要用条码打印，我也用VB.net。求教.

VB.NET中怎么获取当前打印机的纸张类型

我是VB.NET 2010版本

窗体上添加一个按钮，代码如下：

Imports System.Drawing.Printing

Public Class Form1

'采用关键字WithEvents声明一个PrintDocument对象，会引发它的PrintPage事件

Private WithEvents My_PrintDocument As PrintDocument

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

'实例化PrintDocument对象

My_PrintDocument = New PrintDocument

'显示默认的打印机名称

MsgBox(My_PrintDocument.PrinterSettings.PrinterName)

'显示默认的打印机纸张类型名称

MsgBox(My_PrintDocument.DefaultPageSettings.PaperSize.ToString)

End Sub

End Class

vb.net 打印功能

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

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

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

vb.net Document_PrintPag 打印

我帮你把最后一部分的语句顺序调换一下。你试一试

sub button1_click() '---执行打印

Dim pd As PrintDocument = New PrintDocument

pd.PrinterSettings = PrintDialog1.PrinterSettings

If _PrintDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then

for i=0 to 1 '这样可以两次截图

CaptureScreen() '--执行前面自定义函数截图

AddHandler pd.PrintPage, AddressOf Document_PrintPage

pd.Print()

Threading.Thread.sleep(100) ‘ 再加上一个间隔

next

end sub

vb.net,水晶报表打印时纸张变为信纸，打印机里面已经自定义好了纸张，用EXCEL,WORD就正常，请高手指点

别的地方转来的！~ 不过我们以前做的时候 都是在打印机里增加一种打印纸 然后就可以选了！~

一下转载内容！~~~

水晶报表-强大而成熟，但是多少男儿汉败倒在他的自定义纸张设置上。

1：水晶报表是纸形打印。所以自定义纸张类打印肯定要在电脑上增加对应的纸张才行（手动加还是代码加这个不管）

2：纸张分3种系统内建（不可更改），自定义，打印机自带。很遗憾的是水晶只认系统内建的。

3：打印机一般分2种。1普通喷墨的A4,2有联单的针式

4：注意水晶报表不是所见所得的，预览的纸张是什么不一定打印的就是什么纸张（受3方影响。打印机、报表内设置、PAPERSIZE 属性，三者之间关系不详）。

5：对于第一种A4纸张。没什么好说的系统内建纸型。水晶报表认。直接指定就行

6：对于第二种联单的自定义型一般专机专用，当然是建好纸张让打印机默认自己建的纸张为默认首选了。

7：然后设置水晶报表使用打印机默认的纸张PaperSize = CrystalDecisions.Shared.PaperSize.DefaultPaperSize

以上能保证专机专纸的任何打印。：要注意第4点。如果你是自定义纸而且要预览要保障预览和打印都用指定的纸张，那么预览时你得指定PaperSize=你自定义纸张的索引号。打印的时候又改成CrystalDecisions.Shared.PaperSize.DefaultPaperSize

8：如果你想一个打印机多个自定义纸张那么用API吧动态改变打印机的默认纸张，根据以上拐2弯就能实现了遗憾的是网络打印机的话就没折了。o(︶︿︶)o 唉

文章题目：vb.net打印纸列表 vb 打印输出
标题来源：http://chengdu.cdxwcx.cn/article/hgepdj.html