水果篮子 声优 去世:打印文本框时怎样控制打印的字体大小？？

来源：百度文库 编辑：中科新闻网 时间：2024/05/05 08:36:32
我是VB的初学者，请教各位老师：打印文本框时怎样控制打印的字体大小？？（我在文本框的属性设置字体大小后，在文本框内能看到设置的效果，但打印不出设置的效果）！
是打印机的问题还是其它原因？？
怎么解决这一问题？？
有更好的打印方法吗？？

诚心请教。 谢谢！！
谢谢两位，两位的答案一样，我只好选1楼的了。
设置字体的关键是 Printer.FontSize = ??这句吧！
我原来没用函数，语句如下：
CommonDialog1.Action = 5
For i = 1 To CommonDialog1.Copies
Printer.FontSize = 8
Printer.Print T2.Text
Next i
Printer.EndDoc
但就是不能实现打印字体大小。请指点一下。谢谢！！

VB打印需使用PRINTER方法，调用自定义打印函数来控制打印位置和字号大小。自定义打印函数：
Public Function prnt(x As Variant, y As Variant, fnt As Variant, txt0 As Variant)
Printer.CurrentX = x
Printer.CurrentY = y
Printer.FontSize = fnt
Printer.Print txt0
End Function
也可将颜色和字体作为打印函数进行设置。
打印代码：
y = 500
x = 600
txt = "备件代码"
dd = prnt(x, y, fnt, txt)
Printer.EndDoc ' 打印完成。
详细请参阅如下网址：
http://zhidao.baidu.com/question/4168806.html

VB打印需使用PRINTER方法，调用自定义打印函数来控制打印位置和字号大小。自定义打印函数：
Public Function prnt(x As Variant, y As Variant, fnt As Variant, txt0 As Variant)
Printer.CurrentX = x
Printer.CurrentY = y
Printer.FontSize = fnt
Printer.Print txt0
End Function
也可将颜色和字体作为打印函数进行设置。
打印代码：
y = 500
x = 600
txt = "备件代码"
dd = prnt(x, y, fnt, txt)

打印文本框时怎样控制打印的字体大小？？ 为什么在UCDOS下打印时，设置的字体大小不能打印出来？ Excel打印的字体大小如何设置? 打印怎么设置字体大小 怎样在网页中加入一个可以控制打印大小的打印衔接？ vfp中怎样控制报表只打印最后输入的一条记录，并且只打印一条？ word中的文本框打印时无法显示,请问如何解决? wps 特大字打印利用跨页打印为何打印出来并不是一个完整的字？系统为XP，字体大小也未超出数值 为什么在文档中设置的字体大小与打印出来的不一样? 怎样打印数码相机的照片?