vb6中怎么打印窗体中的指定区域?
时间:2011-11-24
来源:互联网
请问一下,如有下一个窗体内容:
-----------------------------------------------------------------
定单记录
收货人:某某某 发货时间:xxxxxxx
------------------------------------------------------------------
货物名称 单价 数量 小计
xxxxx xx xx xxxxxxx
xxxxx xx xx xxxxxxx
-----------------------------------------------------------------
合计金额:xxxxxx
开票人:某某某 打印人:某某某
确定打印 取消打印
因为不好发图,所以只能打概做了这么一个样式,
打比,这图就是一个FORM1的完全打印样式,但,我不想把“确定打印”和“取消打印”这两个 command控件打印出来,也就是说,我只想打印,FORM1中指定区域里的东西,请问一下,各位高手怎么做阿?
-----------------------------------------------------------------
定单记录
收货人:某某某 发货时间:xxxxxxx
------------------------------------------------------------------
货物名称 单价 数量 小计
xxxxx xx xx xxxxxxx
xxxxx xx xx xxxxxxx
-----------------------------------------------------------------
合计金额:xxxxxx
开票人:某某某 打印人:某某某
确定打印 取消打印
因为不好发图,所以只能打概做了这么一个样式,
打比,这图就是一个FORM1的完全打印样式,但,我不想把“确定打印”和“取消打印”这两个 command控件打印出来,也就是说,我只想打印,FORM1中指定区域里的东西,请问一下,各位高手怎么做阿?
作者: xtyuao 发布时间: 2011-11-24
可以使用API BitBlt
Public Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
BitBlt Printer.hdc, pLeft, pTop, nWidth, nHeight, Form1.hdc, fLeft, fTop, vbSrcCopy
Public Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
BitBlt Printer.hdc, pLeft, pTop, nWidth, nHeight, Form1.hdc, fLeft, fTop, vbSrcCopy
作者: worldy 发布时间: 2011-11-24
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28