关于打印的一点问题

Printer.Font = "宋体"
Printer.Print "要打印的字符"
Printer.NewPage
Printer.EndDoc上面的代码是打印一段文字的，有个问题，如果有一行内容很长的话就超过了，这样纸张上就不会显示，问题就是如何让打印机自动换行打印？
如果人工处理的话就得根据纸张大小，再结合字体大小最后对要打印的字符用vbcrlf间隔，这样是不是很麻烦？有没有一个比较好的方法呢？