标题:[求助]怎样使用打印?
只看楼主
gylok
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2007-4-18
得分:0 
我的意思是,不是按窗体打印!
2007-04-20 22:46
gylok
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2007-4-18
得分:0 

要是这样的话,按PRINT,要将选中项逐行打印,应该怎样做?
2007-04-20 22:52
偶是天才
Rank: 1
等 级:新手上路
帖 子:62
专家分:0
注 册:2007-4-20
得分:0 
Form1.PrintForm
2007-04-20 23:43
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
得分:0 
以下是引用gylok在2007-4-20 22:52:41的发言:
4uWVjzF3.rar (1.28 KB) [求助]怎样使用打印?



VB QQ群:47715789
2007-04-21 00:07
gylok
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2007-4-18
得分:0 
楼上的兄弟真的太感谢了!
还有一个问题,怎样在打印页面的顶上放置一张图片?
2007-04-21 22:40
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
得分:0 
Printer.PaintPicture

VB QQ群:47715789
2007-04-21 23:15
gylok
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2007-4-18
得分:0 
能不能解释明白一点Printer.PaintPicture怎样用!
就好像我有一个文件名为2.jpg的文件放在D盘,怎样把它放在打印页面打印出来

就入这张图片,怎样设置放进去!
麻烦你啦!教教我啦!谢谢!
2007-04-21 23:28
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
得分:0 
Dim Picture1 As StdPicture, X As Long

Set Picture1 = New StdPicture
Set Picture1 = LoadPicture("D:\2.jpg")
X = (Printer.Width - Printer.ScaleX(Picture1.Width, vbHimetric, Printer.ScaleMode)) \ 2
If X < 0 Then X = 0
Printer.PaintPicture Picture1, X, 0

[此贴子已经被作者于2007-4-22 2:08:07编辑过]


VB QQ群:47715789
2007-04-22 02:04
ioriliao
Rank: 7Rank: 7Rank: 7
来 自:广东
等 级:贵宾
威 望:32
帖 子:2829
专家分:647
注 册:2006-11-30
得分:0 
Joforn你干脆叫他给个需求你帮他做好...
真无言....

/images/2011/147787/2011051411021524.jpg" border="0" />
2007-04-22 08:55
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
得分:0 
顺便再收点费…………

VB QQ群:47715789
2007-04-22 09:41
  • 25
  • 2/3页
  • 1
  • 2
  • 3



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-133403-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.037668 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved