vb语言控制打印机的问题！！
求救了！高手们！！vb语言控制打印机的问题！！
在vb 模块中怎么写 控制打印机的语句。
查询打印机是否存在？存在了正常工作，不存在给留个返回时间，时间过了就跳出，
等等吧 各位能不能帮忙写一下 多谢了
用Printer 对象进行高分辨率输出。但要想产生复杂的打印输出，编程较为烦琐。Printer 对象代表系统缺省的打印机，Printer 对象支持许多由窗体和图形框所支持的属性和方法，三种对象都有画线和画方框。应用程序可用以下代码在Printer 对象上画出一平方英寸的方框。它离左上角二英寸。注意：打印机以twips 来测量距离。每英寸有1440 个twips。
Printer.Line(2 ＊1440,2 ＊1440) －Step(1440,1440), ,B
打印机、从窗体和图形框都有Circle、PaintPicture、Print、Pset、TextHeight、TextWidth 方法。使用这些方法，应用程序可以为打印机生成高分辨率输出。
打印文本直接用Print 方法，见下列代码：
Printer.Print "Hello,China ComputerWorld!" ' 打印字符串
Printer 对象还有一些窗体和图形框都没有方法：
NewPage 告诉打印机，程序对当前输出页的发送已经结束，Printer 对象应开始新的一页。
EndDoc 告诉VB，程序创建文档结束，VB 应将它发送到物理打印机上打印。
KillDoc 取消当前打印作业。应用程序应该终止由EndDoc 和KillDoc 所设定的每个打印作业。
Zoom 属性用于定义打印输出的缩放因子。
Copies 属性用于定义打印的副本数目。
