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

Question

通常打印的字是正方形的，
我在vb中写的打印程序，需要把字打印成长型，printer.print "谢谢大家！"使用的是这个语句，如何设置？
在word 中很容易的：）谢谢！！！！

Answer 1

這個只能在DataReport設計時設置的

Answer 2

在PictureBox上输出，然后用Printer.PaintPicture在打印机上绘制

Answer 3

在PictureBox上输出，然后用Printer.PaintPicture在打印机上绘制
你能说得详细点吗？
楼上有个大哥说用datareport，这个好像也不能设置长型字体，我试过了
用picturebox如何设置，如何做？

Answer 4

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

Answer 5

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

Answer 6

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

Answer 7

楼上的大哥们，我是这样解决的，但是还是不理想：
先用picture.print 输入出到picturebox上，然后调用
printer.paintpicture form1.picture1.image .......然而，不理想的也象大哥们说的，输入出的字的效果不好，如果用激光打印机还可以接受，但我用的
是针打，所以，输入的数字效果很差，所以这个方法基本上不能用各位大哥们还有更好的办法吗？最理想的是输入成WORD里面输入的效果：）
还有，我看到一个foxbase程序在DOS上输入出，效果很好，我不知道他的程序是最么写的，但是在windows上最么做才能最好呢？

Answer 8

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

Answer 9

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

Answer 10

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