VB求助：Printer.Copies怎样设置打印多页？

VB如下代码，要打印多页，用到Printer.Copies属性，需加在哪个位置才能实现？我试了好多都不成功，网上也未查到有效的解决。
Private Sub Command1_Click()
        MyPrint 2, 2, "操作员编号："
         Printer.EndDoc      
End Sub --------------------编程问答-------------------- Copies 属性
      

返回或设置需要打印的份数。对于 Printer 对象，在设计时不可用。

语法

object.Copies [= number]

Copies 属性语法包含下面部分:

部分 描述 
Object 对象表达式，其值是“应用于”列表中的一个对象。 
Number 数值表达式，指定需要打印的份数。该值必须是整型值。 


说明

对于“打印”对话框，该属性返回在“份数”框中用户输入的份数。如果设置 CommonDialog 控件的 cdlPDUseDevModeCopies 标志，则该属性始终返回 1。

对于 Printer 对象，对多份打印可能进行、也可能不进行核对，这取决于打印机驱动程序。可以将整个文档或将每一页打印多份。对于不支持核对的打印机，设置 Copies = 1，然后在程序中使用循环，就可以将整个文档打印多份。

注意 Printer 对象属性的效果取决于打印机生产商提供的驱动程序。一些属性设置可能不起作用，或几个不同的属性设置具有相同的结果。如果设置值超出可接受范围，就会产生错误。更多的信息，参阅有关驱动程序的生产商文档。
--------------------编程问答-------------------- 安装MSDN, 然后按F1吧

补充：VB ,  控件