易截截图软件、单文件、免安装、纯绿色、仅160KB

vb打印问题


Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4

'初始坐标
x = 1
y = 4


'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x + 132.5, y)-(x + 132.5, y + 194) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x + 132.5, y + 194)-(x, y + 194) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x, y + 194)-(x, y) '起点坐标-终点坐标


我的初始坐标是1毫米和4毫米,但是我打印在A4纸上确是8毫米和8毫米,我用尺量了,很奇怪,大家帮忙看看什么原因???
是否页边距的问题?

还是搞不定啊

大家帮帮忙啊

引用
Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4

'初始坐标
x = 1
y = 4


'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x + 132.5, y)-(x + 132.5, y + 194) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x + 132.5, y + 194)-(x, y + 194) '起点坐标-终点坐标
Printer.DrawStyle = 0
Printer.Line (x, y + 194)-(x, y) '起点坐标-终点坐标


我的初始坐标是1毫米和4毫米,但是我打印在A4纸上确是8毫米和8毫米,我用尺量了,很


相关问答:

对象打开时,不允许操作。 vb封装asp

在做树型目录时出现的,以下是部分代码

VB code:

Function TreeMenu(id)
sql = "select * from Class where CateID=1"
rs.Open sql, cover, 1, 1
While Not rs.EOF
Response.Write rs(&quo ......

VB与LINUX下数据库连接的问题

各位大侠,现有一难题求教:假设数据库(mysql或oracle……等数据库)安装在LINUX系统的服务器上,我在客户端(windows系统)用 VB如何建立与数据库的连接,是否可以使用类似ADO或DAO当中的连接语句?请哪位大侠指导 ......

请教用vb将txt导入sql的问题

由于每月从别的公司送来一个txt文件,格式如下:
   
0023939608011黄根养                                &n ......

vb datagrid sql

一个窗体,3个datagrid,共计3个表,一个表对应一个datagrid,点击datagrid1(打开该窗体时已经被赋值),根据datagrid1中的某个值,查询表2和表3,并把符合条件的分别赋值给datagrid2和datagrid3,要怎么写

VB ......

我要学存储过程(VB.NET,SQL)跪求教程~~

如题~~
MSDN,Google,想系统学建议还是买本书看吧,毕竟手打的代码记忆要比复制的深刻。

我要边学边用在代码里面,肯定要手打的了


看看sql server 2005的帮助很全面或看看书
http://topic.csdn.net/u/2 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号