怎样设置printer.width？？

qhdzh 2003-11-23 10:19:33

我在程序中通过下列代码来设置纸张大小，可是不管用，请问应怎样设置，我的系统为2000server.
Printer.PaperSize = vbPRPSUser
Printer.Height = 14742
Printer.Width = 10773

...全文

90 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

rainstormmaster 2003-11-23

打赏
举报

回复

有些打印机不支持vbPRPSUser，需要注意

你可以用GDI函数试试

2. **设置边距**：左右边距可以通过`Printer.MarginLeft`和`Printer.MarginRight`设定，上下边距则通过`Printer.MarginTop`和`Printer.MarginBottom`控制。同样，边距也是以twips为单位。例如，如果设置1英寸的边距...

Printer.Canvas.ScaleBy(Printer.PageWidth / Image.Width, Printer.PageHeight / Image.Height); // 计算图片在打印页面上的位置 X := (Printer.PageWidth - Image.Width * Printer.Canvas.ScaleX) div 2; Y :=...

1. **初始化Printer对象**：先调用`Printer.StartDoc`开始一个新的文档，并设置打印机的相关属性，如页面大小、分辨率等。 2. **设计表格布局**：确定表格的行数、列数，以及单元格的宽度和高度。这可以通过计算...

　Printer.PaintPicture Picture1.Picture, Picture1.Width, Picture1.Height 　Printer.CurrentX = 100 　Printer.CurrentY = 100 　Printer.NewPage ' 发送新页。　Printer.EndDoc ' 打印完毕。　End Sub 　编译...

Printer.DrawPicture(img, 0, 0, img.Width, img.Height) Printer.EndPage Printer.EndDoc ``` 五、常见问题及解决方案 1. **打印质量**：如果打印出来的图像模糊不清，可能是因为分辨率设置不恰当，应适当提高`...

7,789

社区成员

197,583

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章