CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
可用分押宝游戏火热进行中... 专题改版:Java Web 专题
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  VB >  数据库(包含打印,安装,报表)

如何设置小型打印纸张?

楼主Chengs_bbs(盛实)2005-08-03 08:02:46 在 VB / 数据库(包含打印,安装,报表) 提问

如果要打印小型纸张(如:毕业证书\医疗清单\明信片\信封等),那么应该怎么设置打印纸张,是否一定要用printer.width=?,printer.height=?(自定义类型).  
  问:用printer自定义类型是否支持各种操作系统(98-XP),大家在开发的过程中有没有其它的好办法.  
  问题点数:10、回复次数:2Top

1 楼mingtian2008(明天)回复于 2005-08-03 09:52:09 得分 0

不需要的.但是需要自己调整   打印的位置.  
   
  给你看看我以前做的一个结业证打印的代码  
   
  '_________打印  
  Printer.FontName   =   "宋体"  
  Printer.FontSize   =   "12"  
   
  Printer.CurrentY   =   800  
  Printer.CurrentX   =   850  
  Printer.Print   tempPrint.Name  
   
  Printer.CurrentY   =   800  
  Printer.CurrentX   =   2600  
  Printer.Print   tempPrint.Sex  
   
  Printer.CurrentY   =   800  
  Printer.CurrentX   =   3950  
  Printer.Print   Format(tempPrint.KDate,   "YYYY")  
   
  Printer.CurrentY   =   800  
  Printer.CurrentX   =   5150  
  Printer.Print   Format(tempPrint.KDate,   "MM")  
   
  Printer.CurrentY   =   800  
  Printer.CurrentX   =   5750  
  Printer.Print   Format(tempPrint.KDate,   "DD")  
   
  Printer.CurrentY   =   1600  
  Printer.CurrentX   =   750  
  Printer.Print   Format(tempPrint.ZDate,   "YYYY")  
   
  Printer.CurrentY   =   1600  
  Printer.CurrentX   =   2000  
  Printer.Print   Format(tempPrint.ZDate,   "MM")  
   
  Printer.CurrentY   =   1600  
  Printer.CurrentX   =   2650  
  Printer.Print   Format(tempPrint.ZDate,   "DD")  
   
  Printer.FontBold   =   True  
   
  Printer.CurrentY   =   1600  
  Printer.CurrentX   =   4600  
  Printer.Print   StrTemp1  
   
   
  Printer.FontSize   =   "8"  
   
   
  Printer.CurrentY   =   1670  
  Printer.CurrentX   =   4720  
  Printer.Print   StrTemp2  
   
   
  Printer.FontSize   =   "12"  
  Printer.FontBold   =   False  
   
  Printer.CurrentY   =   4100  
  Printer.CurrentX   =   1550  
   
  Printer.Print   tempPrint.Nume  
   
   
  Printer.CurrentY   =   5800  
  Printer.CurrentX   =   5200  
  Printer.Print   Format(tempPrint.Adddate,   "YYYY")  
   
   
  Printer.CurrentY   =   5800  
  Printer.CurrentX   =   6400  
  Printer.Print   Format(tempPrint.Adddate,   "MM")  
   
  Printer.CurrentY   =   5800  
  Printer.CurrentX   =   7250  
  Printer.Print   Format(tempPrint.Adddate,   "DD")  
   
  Printer.EndDoc  
   
  Top

2 楼hexingwu(西域小子)回复于 2005-08-03 11:39:52 得分 0

我也遇到你这样的问题呀,你刚才的设置在98里面才行,在2000里面不行。  
  我正愁得很呢,急死我了。希望懂的人能来这里说说吗?  
   
  最好就是能不改变打印机的设置而临时改变打印Top

相关问题

  • 如何动态地设置打印纸
  • 有谁知道打印机中的打印纸张大小的如何设置?(非自定义打印纸)
  • ActiveReport中如何设置打印纸的尺寸?
  • 如何在打印前设置打印纸张的大小
  • 如何在程序中设置打印纸张大小?
  • 如何在NT4.0中设置自定义打印纸张?急!
  • 2000下如何自定义设置打印纸张?
  • 如何用程序控制打印纸张的设置?
  • 如何用pb6.5在winxp设置打印纸张?
  • 如何在VFP中设置EXCEL的打印纸张?????

关键词

  • 打印
  • printer
  • tempprint
  • currenty
  • currentx
  • kdate
  • 设置
  • print format

得分解答快速导航

  • 帖主:Chengs_bbs

相关链接

  • Visual Basic类图书
  • Visual Basic类源码下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
世纪乐知(北京)网络技术有限公司 版权所有, 京 ICP 证 020026 号
北京创新乐知广告有限公司 提供技术支持
Copyright © 2000-2007, CSDN.NET, All Rights Reserved
GongshangLogo