用printer打印如何在一行中打印两种不同的字体

Question

printer.print "学生:";tab(10);"姓名"
我想将学生打印成“宋体”姓名打印成“揩体”？
谢谢！

Answer 1

那你得分别设置
printer.currentx=50:printer.currenty=100
set printer.fontname="宋体"
printer.print "学生"
printer.currentx=200:printer.currenty=100
set printer.fontname="楷体"
printer.print "姓名"
...

Answer 2

Dim OldX&, OldY&
Private Sub Command1_Click()
   Me.Cls
   Me.FontSize = 24
   Me.FontName = "宋体"
   OldY = Me.CurrentY
   Print "学生:"; Tab(10);
   OldX = Me.CurrentX
   Me.FontName = "楷体_GB2312"
   Me.Font.Italic = True
   Me.CurrentX = OldX: Me.CurrentY = OldY
   Print "姓名"
End Sub效果图:
http://p.blog.csdn.net/images/p_blog_csdn_net/cbm666/366646/o_tab.jpg