很烦的问题，如何不字体打印成长型或者扁型？头痛中！！！！！

snwxf 2005-01-14 08:05:55

通常打印的字是正方形的，
我在vb中写的打印程序，需要把字打印成长型，

printer.print "谢谢大家！"

使用的是这个语句，如何设置？
在word 中很容易的：）

谢谢！！！！

...全文

278 13 打赏收藏转发到动态举报

写回复

用AI写文章

13 条回复

切换为时间正序

请发表友善的回复…

发表回复

northwolves 2005-01-22

打赏
举报

http://blog.csdn.net/northwolves/archive/2004/08/01/58184.aspx

snwxf 2005-01-22

打赏
举报

printer.quality 调高没有任何作用。

...
picture1.autoredraw=true
picture1.fontsize=32 '越大越好哦
textout picture1.hdc,...
picture1.refresh
Printer.PaintPicture picture1.pictrue ...
...
基本就是这样。
-------------------------------------
这位大哥的办法大概是把字体调大，然后再缩小输出？不知道行不行，我试一下，不过想法我觉得很好的：）

谢谢各位！！！！

samwzhang 2005-01-22

打赏
举报

printer.quality调调高么。

熊孩子开学喽 2005-01-22

打赏
举报

...
picture1.autoredraw=true
picture1.fontsize=32 '越大越好哦
textout picture1.hdc,...
picture1.refresh
Printer.PaintPicture picture1.pictrue ...
...
基本就是这样。

snwxf 2005-01-21

打赏
举报

楼上的大哥们，我是这样解决的，但是还是不理想：
先用picture.print 输入出到picturebox上，然后调用
printer.paintpicture form1.picture1.image .......

然而，不理想的也象大哥们说的，输入出的字的效果不好，如果用激光打印机还可以接受，但我用的
是针打，所以，输入的数字效果很差，所以这个方法基本上不能用

各位大哥们还有更好的办法吗？最理想的是输入成WORD里面输入的效果：）
还有，我看到一个foxbase程序在DOS上输入出，效果很好，我不知道他的程序是最么写的，但是在windows上最么做才能最好呢？

熊孩子开学喽 2005-01-15

打赏
举报

使用图形方法打印。
就是楼上 viena(维也纳nn-实心木头人石欠RUKYO)说的那样。
先在PICTUREBOX上输出文字，再用PAINTPICTURE方法来拉长或压扁

snwxf 2005-01-15

打赏
举报

谢谢，我试试看行不行

viena 2005-01-14

打赏
举报

Printer.PaintPicture picture, x1, y1, width1, height1, x2, y2, width2, height2

viena 2005-01-14

打赏
举报

就是
Picture1.CurrentX = x坐标
Picture1.CurrentY = y坐标
Picture1.print "要打印的字"
然后以图形的方式，通过改变Picture的高度使字拉长，我没有做过，但是估计效果可能不太好

Printer.PaintPicture Picture1.picture, x1, y1, width1, height1, x2, y2, width2

snwxf 2005-01-14