说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB编程步步高-打印篇(二)

HTML文档下载 WORD文档下载 PDF文档下载
VB编程步步高-打印篇(二)

作 者 : 甘冀平
   快速打印多个拷贝

   当以TrueType字体打印一个文档时,系统将下载打印机需要的字体,这样做将花费很长的时间。你可以通过在一个打印机文档中打印所有的拷贝实现快速打印多个拷贝内容:

For i = 1 To num_copies
注释: Print the document here...

Printer.NewPage
Next i
Printer.EndDoc
   打印灰色行和区域

   黑白打印机不能打印灰色行,但是能通过发抖处理来创建灰色区域。为了创建围绕一个区域的一个灰色边界,使用DrawStyle=vbInvisible(5)来绘制一个窄灰色框,这样就没有了边界。

   设置打印的边界

   使用打印的scale熟悉来设置边界。设置了这个属性后,坐标(0,0)就映射到你需要加边的地方。比如,下面的代码设置左边界为0.5英寸,上边界为0.75英寸。然后再乘以1440转换为twip。

   Printer.ScaleLeft = -0.5 * 1440
Printer.ScaleTop = -0.75 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0

   很遗憾,打印机不能精确地按照你所想的进行打印。试一试使用下面的命令在左上角打印一个1英寸大小的方块:

   Printer.Line (1440, 1440)-Step(1440, 1440)

   看看偏离了多少。试一试多打印几次,如果发现打印机有一定规律的偏离,你就可以按照一定的差额进行增减来达到最佳的效果。

   提供打印预览

   建立打印程序时,先设置一个要绘制的对象做为参数,然后传递给程序一个打印的对象。

   为了实现预览效果,传递给程序一个隐藏PictureBox。然后,根据需要的比例,使用PaintPicture拷贝这个隐藏图形到一个可见的PictureBox。在隐藏PictureBox上按照全尺寸绘制图形,首先允许你按比例决定了字体,并且,也实现了不失真地完成其他图形的描述。
如何检查软驱中的软盘和光驱的光盘是否发生变化。-Delphi资料 如何检查一个驱动器是否就绪?并且不出现错误信息-Delphi资料 如何将Wav文件做到EXE文件里-Delphi资料 如何将你的程序放在Windows启动中-Delphi资料 如何控制Ctrl+Alt+Del键-Delphi资料 如何控制壁纸-Delphi资料 如何控制关闭Windows-Delphi资料 如何屏蔽系统功能键-Delphi资料 如何取得Windows的临时文件目录?-Delphi资料 如何确保你的.exe文件仅运行一次!-Delphi资料 如何让 Windows 模拟按键-Delphi资料 如何让程式只执行一份?-Delphi资料 如何让程序只执行一次?-Delphi资料 如何删除一个控件的子控件-Delphi资料 如何识别显示器当前的分辨率-Delphi资料 如何为Delphi程序添加事件和事件处理器 如何写小执行程序-Delphi资料 如何隐藏桌面上的图标-Delphi资料 如何用API更改改计算机名字-Delphi资料 如何用Delphi映射网络驱动器? 如何在字符串截取中避免分割到半个汉字-Delphi资料 如何知道用户点击了窗口的最小化按钮?-Delphi资料 如何中断线程的执行-Delphi资料 如何终止一个线程-Delphi资料 如何转让控制权-Delphi资料 使用Delphi 4.0编写多线程 使用Delphi获取系列信息 使用DELPHI实现文本文件显示和声音同步播放 为系统菜单添加新菜单-Delphi资料 显示密码编辑框中的密码-Delphi资料 写小执行程序-Delphi资料 为什么我的Web应用程序项目启动不了,总是出现错误!!! 100分求教jtable问题??? 菜鸟送分问题,请哪位大侠讲讲Inte1.ResponseCode和Inte1.ResponseInfo 声音变了!怎么办啊??? 100分 请问怎么做“索引”? make求救 用ant编译pet store 时,出现问题,提示信息见内文?请帮忙。。。高分酬谢。 三个三角了 开心ing 散分 tmd,上了vsnet2003贼船了。原来vc6的都不好用了 找在linux下免费gui?? 打开窗口获取原窗口信息的问题 Cbuilder安装问题,急! HelloWorld大全[接龙] 我要写一个程序在前台不需要运行后台运行可以:就像平时邮件服务品一样在前台不需要运行,而后台是提供服务的,要怎样来实现 临时表问题 多媒体教学系统开发 jbuilder中关于类的import问题? 有关远程控制的,例如抓屏,限制功能键,限制alt+f4,等等,请去http://hedaofeng.jahee.com 如何取得IE地址栏的输入信息? 急求一段ASP与SQLserver2000处理代码! 怎么创建win32 static library并输出函数?谢谢 !!!!求排列组合的简洁算法(80分) 我要对Spreadsheet的数据进行排序,用javascript怎么写 WIN32异常求救????!!!!!! 一个有深度的问题(对信号量操作不熟者请勿进) 知道为什么会出现iocopyout_chksum吗? 谁能给我《中文ACCESS开发指导手册》?? 从网上下的读不了 请问一个小问题 关于用Preferences存取注册表的问题 参数类型的问题 谁知道用什麽软件可以播放扩展名为1MP3的文件?(100分) 请问把一个二进制文件转换成文本文件,再把文本文件转换成二进制文件,该怎么做?求源代码?或有该代码的网址链接,多谢!不胜感激! main()函数里的两个参数argc、argv是什么意思?请赐教! 用HTTP上传文件,那位做过实际的应用的,帮忙... 大家上微软新闻组吧,感觉比这里快。 用jfreechart画出的图形,里边的汉字不太清楚,有没有解决的办法,要是图形小一点,模糊不清,难看死了,请问有没有解决办法?? 在vc.net中为什么新建的一个dialog,上面有双重的图象啊? asp&oracle问题 .net2003中vb升级向导有没有接口可以被其他程序调用? 以二进制方式打开文件,用ftell计算文件大小,为什么有时对有时不对? CHtmlEditView中如何实现表格的单元格大小调整? 城市夜归人 请问把一个二进制文件转换成文本文件,再把文本文件转换成二进制文件,该怎么做?求源代码?或有该代码的网址链接,多谢!不胜感激! 如何在一个网页中使用多种样式表显示多种效果? 直接用http调用代理怎么进行权限设置 CHtmlEditView中如何实现表格的单元格大小调整? 各位老大。。。如何用asp加密解密中文字符串,小生有礼了! 这段程序怎么不能运行?thinking in java 我的应用程序启动连接数据库时自动拨号,怎么去掉?? 谁给讲讲多线程!进着有分! 菜鸟问:jbuilder9比8都增加了什么功能?做了哪些改进? a hope school 意思 Hope primary school 张叔叔买了一些报纸,进价0.35元,售价0.5元,当还有20张报纸没卖时,除去成本张叔叔赚了20元,请问他进了多少报纸?(算数解法、步骤详细、说明每一步的原因) 健康比财富更重要么?英语80字 关于Windows桌面上的任务栏说法不正确的是(  )A.可以隐藏B.可以移动到桌面右边  C.可以改变其宽度  D.不可以改变其宽度 关于“猴子”的英语谚语或成语? hope和hope for的用法及区别 芃字的意思? long for是不是等同于hope for chuan shi zuo pin成语 将zhuang一音-----zuo四音shi四音.拼音补上去,在写出成语 北京数万重卡深夜进城 排污量相当于百万达称楼市调控方向偏差 应保证居者有尿毒症少年进京求医续:母亲将提交捐肾华盛顿举行抗议活动要求停止“棱镜式”学者质疑机关事业单位建职业年金 或制老伯拍摄监督公车8年频遭恐吓 出现反北京药店卖奶粉首日调查:价格未见便宜长沙天心区将女教师调到拆迁指挥部 劝德国巴西牵头起草联大决议 呼吁保障网英媒体披露英国监听规模远超外界想象新疆人大党组开民主生活会 称落实决策本周末,来红星车博会买车漂,也能这样舒心怡神金丝楠木收藏价值看涨中小企业圆桌汇7月10日开讲车市继续飘红,经销商喊“苦”深天地A:否认小马奔腾借壳传闻郑州方特水上乐园盛大开业“天天江南”超值游倒倒手,职业二房东月赚万把块这,是一堂跨越万里的英语课无标题死灵仙极天仙路梦想——杀手童话九天记至尊图腾天马行空之萧峰后传笑笑江湖水浒修神网游之死亡游戏莫问天风流三国伊克昭盟旅游桔香园农家乐旅游彭阳旅游陶乐旅游章村旅游南县旅游乌来旅游老营旅游临泽县旅游跑马梁旅游阿巴嘎旗旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘