试试
Private Sub Command1_Click()
Picture1.ScaleMode = 1
Picture1.CurrentX = -100
Picture1.Print "-100"Picture1.CurrentX = 200
Picture1.Print "200"Picture1.CurrentX = 500
Picture1.Print "500"
End Sub
Private Sub Command1_Click()
Picture1.ScaleMode = 1
Picture1.CurrentX = -100
Picture1.Print "-100"Picture1.CurrentX = 200
Picture1.Print "200"Picture1.CurrentX = 500
Picture1.Print "500"
End Sub
解决方案 »
- Excel可否像Word那样,根据几行几列定位
- 如何在VSFLEXGRID的中间插入一行呀?
- 严重问题! 请斑竹尽快解决~ 固顶的“征集VB编程经验”内有病毒!!
- 怎么样把SQL里的用户名和密码连接到VB的登录框?
- 请问如何在vb里把数据以二进制的形式存到access里面,然后再读出来呢
- 100分向送,急需帮助--字符串转成运算表达式!!!
- 用VB怎么写打印报表设计器呀???
- printer的问题...........为什么我定义了打印机纸张可是还是无法全部打印数据?????快来看看啊....看了就有分啊...呵呵...我是老山啊...
- mshflexgrid与datagrid
- ''''
- 关于dll的声明
- 二进制兼容是什么意思啊?
http://ygyuan.3322.net/
请问到底要怎么实现?是不是要设置Printer.Width啊
没有设啊,要设置成什么呢?
================================================================
[email protected]
我试了,好象没什么反应啊
================================================================
[email protected]
================================================================
[email protected]
设置Printer.ScaleMode = vbPoints后,左边距不会变啊,只是行间距达到半页纸之多,什么原因呢?
================================================================
[email protected]
Printer.CurrentX=3 你都试试。
要还不行就换个打印机看看。
================================================================
[email protected]
从打印属性里找不到与这个有关的东西啊
================================================================
[email protected]
我们上班时间不能用qq,为工作也不能!:)
再换个打印机!!
printer.PaperSize 你用的是A4么
================================================================
[email protected]
我已经把Printer.CurrentX=0了,但打印出来左边第一个字母里纸的最左边还有7、8厘米。
用的是A4的,我想应该不是打印机的问题,我现在手边就一台打印机
================================================================
[email protected]