VB 中打印设置中的问题
2008-01-14 22:14
225 查看
Printer.Height=10*567
Printer.Width=5*567
Printer.ScaleWidth = 210
Printer.ScaleHeight = 297
Printer.ScaleMode = 6 '设置打印的单位
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
Printer.FontSize = 11
'如何用printer设置打印方向为横向打印
---------------------------------------------------------------
Printer.Orientation=VbPRORPortrait'纵向打印
Printer.Orientation=VbPRORLandscape'横向打印
---------------------------------------------------------------
Printer.Orientation = VbPRORLandscape
---------------------------------------------------------------
Printer.Orientation = 2
'设置打印页边距
'你可以使用打印机的Scale属性来设置打印页边距。下面的代码设置左边距为1/2英寸。右边距为3/4英寸。乘以1440是将英尺转换成twips。
Printer.ScaleLeft = -0.75 * 1440
Printer.ScaleTop = -0.5 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0
缇是一个与屏幕无关的单位,用来保证屏幕应用程序对屏幕元素的定位和比例在所有的显示系统上的一致性。一缇等价于 1/20 个打印机的磅。一逻辑英寸大约有 1440 缇,一逻辑厘米约 567 缇(打印时的一英寸或一厘米所对应的屏幕上的长度)。
How To Print Using Custom Page Sizes on Windows NT and Windows 2000
打印文本直接用Print方法,见下列代码:
Printer. Print “Hello, China computerWorld!” 打印字符串
Printer对象还有一些窗体和图形框都没有方法:
NewPage告诉打印机,程序对当前输出页的发送已经结束,Printer对象应开始新的一页。
EndDoc告诉VB,程序创建文档结束,V应将它发送到物理打印机上打印。
KillDoc取消当前打印作业。应用程序应该终止由EndDoc和KillDoc所设定的每个打印作业。
Zoom属性用于定义打印输出的缩放因子。
Copies属性用于定义打印的副本数目。
=================================================================================
Printer.Orientation=打印方向名或值
vbPROPortrait=1 纵向打印
vbPROLandscape=2 横向打印
Printer.ScaleMode=打印度量单位设定值
vbTwips=1 单位缇,每英寸1440缇
vbPoints=2 单位点,每英寸72点
vbPixels=3 单位像素
vbInches=5 英寸
vbMilimeters=6 毫米
vbCentimeters=7 厘米 建议用毫米
Printer.CurrentX=坐标值
Printer.CurrentY=坐标值
Printer.Print 字符串
Printer.FontName="字体名称"
Printer.FontSize= 字号值 以磅为单位
Printer.EndDoc(如无此局则打印机不工作)
Printer.NewPage(无此句打印机不换页)
Printer.KillDoc(无此句不能断开计算机和打印机的连接)
上面3条语句非常重要
=================================================================================
Printer.Height=10*567
Printer.Width=5*567
Printer.ScaleWidth = 210
Printer.ScaleHeight = 297
Printer.ScaleMode = 6 '设置打印的单位
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
Printer.FontSize = 11
'如何用printer设置打印方向为横向打印
---------------------------------------------------------------
Printer.Orientation=VbPRORPortrait'纵向打印
Printer.Orientation=VbPRORLandscape'横向打印
---------------------------------------------------------------
Printer.Orientation = VbPRORLandscape
---------------------------------------------------------------
Printer.Orientation = 2
'设置打印页边距
'你可以使用打印机的Scale属性来设置打印页边距。下面的代码设置左边距为1/2英寸。右边距为3/4英寸。乘以1440是将英尺转换成twips。
Printer.ScaleLeft = -0.75 * 1440
Printer.ScaleTop = -0.5 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0
缇是一个与屏幕无关的单位,用来保证屏幕应用程序对屏幕元素的定位和比例在所有的显示系统上的一致性。一缇等价于 1/20 个打印机的磅。一逻辑英寸大约有 1440 缇,一逻辑厘米约 567 缇(打印时的一英寸或一厘米所对应的屏幕上的长度)。
How To Print Using Custom Page Sizes on Windows NT and Windows 2000
打印文本直接用Print方法,见下列代码:
Printer. Print “Hello, China computerWorld!” 打印字符串
Printer对象还有一些窗体和图形框都没有方法:
NewPage告诉打印机,程序对当前输出页的发送已经结束,Printer对象应开始新的一页。
EndDoc告诉VB,程序创建文档结束,V应将它发送到物理打印机上打印。
KillDoc取消当前打印作业。应用程序应该终止由EndDoc和KillDoc所设定的每个打印作业。
Zoom属性用于定义打印输出的缩放因子。
Copies属性用于定义打印的副本数目。
=================================================================================
Printer.Orientation=打印方向名或值
vbPROPortrait=1 纵向打印
vbPROLandscape=2 横向打印
Printer.ScaleMode=打印度量单位设定值
vbTwips=1 单位缇,每英寸1440缇
vbPoints=2 单位点,每英寸72点
vbPixels=3 单位像素
vbInches=5 英寸
vbMilimeters=6 毫米
vbCentimeters=7 厘米 建议用毫米
Printer.CurrentX=坐标值
Printer.CurrentY=坐标值
Printer.Print 字符串
Printer.FontName="字体名称"
Printer.FontSize= 字号值 以磅为单位
Printer.EndDoc(如无此局则打印机不工作)
Printer.NewPage(无此句打印机不换页)
Printer.KillDoc(无此句不能断开计算机和打印机的连接)
Printer.Width=5*567
Printer.ScaleWidth = 210
Printer.ScaleHeight = 297
Printer.ScaleMode = 6 '设置打印的单位
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
Printer.FontSize = 11
'如何用printer设置打印方向为横向打印
---------------------------------------------------------------
Printer.Orientation=VbPRORPortrait'纵向打印
Printer.Orientation=VbPRORLandscape'横向打印
---------------------------------------------------------------
Printer.Orientation = VbPRORLandscape
---------------------------------------------------------------
Printer.Orientation = 2
'设置打印页边距
'你可以使用打印机的Scale属性来设置打印页边距。下面的代码设置左边距为1/2英寸。右边距为3/4英寸。乘以1440是将英尺转换成twips。
Printer.ScaleLeft = -0.75 * 1440
Printer.ScaleTop = -0.5 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0
缇是一个与屏幕无关的单位,用来保证屏幕应用程序对屏幕元素的定位和比例在所有的显示系统上的一致性。一缇等价于 1/20 个打印机的磅。一逻辑英寸大约有 1440 缇,一逻辑厘米约 567 缇(打印时的一英寸或一厘米所对应的屏幕上的长度)。
How To Print Using Custom Page Sizes on Windows NT and Windows 2000
打印文本直接用Print方法,见下列代码:
Printer. Print “Hello, China computerWorld!” 打印字符串
Printer对象还有一些窗体和图形框都没有方法:
NewPage告诉打印机,程序对当前输出页的发送已经结束,Printer对象应开始新的一页。
EndDoc告诉VB,程序创建文档结束,V应将它发送到物理打印机上打印。
KillDoc取消当前打印作业。应用程序应该终止由EndDoc和KillDoc所设定的每个打印作业。
Zoom属性用于定义打印输出的缩放因子。
Copies属性用于定义打印的副本数目。
=================================================================================
Printer.Orientation=打印方向名或值
vbPROPortrait=1 纵向打印
vbPROLandscape=2 横向打印
Printer.ScaleMode=打印度量单位设定值
vbTwips=1 单位缇,每英寸1440缇
vbPoints=2 单位点,每英寸72点
vbPixels=3 单位像素
vbInches=5 英寸
vbMilimeters=6 毫米
vbCentimeters=7 厘米 建议用毫米
Printer.CurrentX=坐标值
Printer.CurrentY=坐标值
Printer.Print 字符串
Printer.FontName="字体名称"
Printer.FontSize= 字号值 以磅为单位
Printer.EndDoc(如无此局则打印机不工作)
Printer.NewPage(无此句打印机不换页)
Printer.KillDoc(无此句不能断开计算机和打印机的连接)
上面3条语句非常重要
=================================================================================
Printer.Height=10*567
Printer.Width=5*567
Printer.ScaleWidth = 210
Printer.ScaleHeight = 297
Printer.ScaleMode = 6 '设置打印的单位
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
Printer.FontSize = 11
'如何用printer设置打印方向为横向打印
---------------------------------------------------------------
Printer.Orientation=VbPRORPortrait'纵向打印
Printer.Orientation=VbPRORLandscape'横向打印
---------------------------------------------------------------
Printer.Orientation = VbPRORLandscape
---------------------------------------------------------------
Printer.Orientation = 2
'设置打印页边距
'你可以使用打印机的Scale属性来设置打印页边距。下面的代码设置左边距为1/2英寸。右边距为3/4英寸。乘以1440是将英尺转换成twips。
Printer.ScaleLeft = -0.75 * 1440
Printer.ScaleTop = -0.5 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0
缇是一个与屏幕无关的单位,用来保证屏幕应用程序对屏幕元素的定位和比例在所有的显示系统上的一致性。一缇等价于 1/20 个打印机的磅。一逻辑英寸大约有 1440 缇,一逻辑厘米约 567 缇(打印时的一英寸或一厘米所对应的屏幕上的长度)。
How To Print Using Custom Page Sizes on Windows NT and Windows 2000
打印文本直接用Print方法,见下列代码:
Printer. Print “Hello, China computerWorld!” 打印字符串
Printer对象还有一些窗体和图形框都没有方法:
NewPage告诉打印机,程序对当前输出页的发送已经结束,Printer对象应开始新的一页。
EndDoc告诉VB,程序创建文档结束,V应将它发送到物理打印机上打印。
KillDoc取消当前打印作业。应用程序应该终止由EndDoc和KillDoc所设定的每个打印作业。
Zoom属性用于定义打印输出的缩放因子。
Copies属性用于定义打印的副本数目。
=================================================================================
Printer.Orientation=打印方向名或值
vbPROPortrait=1 纵向打印
vbPROLandscape=2 横向打印
Printer.ScaleMode=打印度量单位设定值
vbTwips=1 单位缇,每英寸1440缇
vbPoints=2 单位点,每英寸72点
vbPixels=3 单位像素
vbInches=5 英寸
vbMilimeters=6 毫米
vbCentimeters=7 厘米 建议用毫米
Printer.CurrentX=坐标值
Printer.CurrentY=坐标值
Printer.Print 字符串
Printer.FontName="字体名称"
Printer.FontSize= 字号值 以磅为单位
Printer.EndDoc(如无此局则打印机不工作)
Printer.NewPage(无此句打印机不换页)
Printer.KillDoc(无此句不能断开计算机和打印机的连接)
相关文章推荐
- 章鱼哥出品—VB.NET DataGridView绑定数据源 "与货币管理器的位置关联的行不能设置为不可见" 问题的解决
- VB打印设置的一些摘要
- 网页打印问题,打印设置,打印预览,打印分页,纵打,横打及页面的边距
- 解决 Webkit 浏览器下打印网页需要手工设置 "打印背景色" 的问题
- 网页打印问题,打印设置,打印预览,打印分页,纵打,横打及页面的边距
- 针对VB打印的一些常用设置
- VB中关于statusbar状态条随FORM变化的问题,以及如何设置toolbar
- .NET打印设置问题
- 多线程访问同一资源第二步 : 线程设置 以及 线程打印 用synchronized解决数据不匹配问题
- 关于VFP报表输出时是否有打印设置问题的解决
- vb打印要属性设置
- C# Winform 打印边距设置 单位转换的问题
- vb.net写ASP.NET 第一个问题是页面背景如何设置?
- VB.NET控制EXCEL打印的速度问题!
- .NET打印设置问题
- vb.net 类的属性的设置和获取问题
- vb.net写ASP.NET 第二个问题是如何设置table让他上下左右都居中呢??
- popupWindow+软键盘弹出,edittext设置,textview字体颜色设置,log打印过长显示不出来的问题
- Android开发-----关于解决Retrofit打印HttpLog和设置连接超时的问题
- powerbuilder+composite组合报表打印设置zoom问题