vb 如何设置打印边距?
需要打印的窗体大小为: 10545 * 9180
打印机默认纸张大小为: A4
问:
怎样使打印时顶部及左边装订线各预留 10mm 的位置?
谢谢!!!
以下你我打印部分的代码:
Private Sub Cmd_print_Click()
Printer.PaperSize = vbPRPSA4
Printer.PrintQuality = -4
Width = Me.ScaleWidth
Height = Me.ScaleHeight
Me.PrintForm
End Sub
[Quote=引用 2 楼 jhone99 的回复:]
设置打印页边距
你可以使用打印机的Scale属性来设置打印页边距。下面的代码设置左边距为1/2英寸。右边距为3/4英寸。乘以1440是将英尺转换成twips。
Printer.ScaleLeft = -0.75 * 1440
Printer.ScaleTop = -0.5 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0
楼上的朋友,我试过了,但是不成功!
继续期待...
是不是论坛改版后大家有些不习惯呢????
相关问答:
我有厂家做的ASP的监控录像(DVR)的局域网播放的源程序与控件,想要用ASP.net做一个视频回放的程序(利用他的控件)但不知如下去做,望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
大家好,问个vb打印问题
printer.print "dsff"
.....
....
Printer.EndDoc
打印成功后我将执行
sqlstr = "update vc_yh set pr=' 已打印 ', ......
在vb这编程里似乎有很多的东西是相联系的,为什么有些人对vb的编程摸不到头脑啊!并且有些事很容易的,但是却把它们的代码变成复杂,也去想一些不能实现的东西啊!
没分了,楼主多来点分!
来接点分
......
就是设计一个计算机模拟考试系统,带有学生和管理员,所以登录窗体和主窗体想分开,登陆学生的显示学生的主窗体,登陆管理员显示管理主窗体,我只会一个窗体用一堆控件,现在享有多个主窗体,不知道怎么做,希望请大 ......
再VB模块中我是通过如下方式来连接主库和历史库的(历史库数据量大)
VB code:
Public Connstr As String
Public objConn As New ADODB.Connection
Public ConnHISstr As String
Public objConnHIS As New A ......