Visual Basic - Imprimir PICTURE BOX urgente¡¡¡¡¡

Amigos, NECESITO IMPRIMIR un PictureBox desde un formulario haciendo click en un boton del formulario. He tratado usando metodo Printer y no me ha resultado. La base de mi programa es la siguiente:
Private Sub Command1_Click()
Printer.FontName = "Courier New"
Printer.ScaleMode = vbCentimeters ' la escala q se utilizara en este caso cm, si quieres trabajar con otra escala consulta la MSDN.

Printer.CurrentY = 0 '<----- Posicion Y
Printer.CurrentX = 0 '<------ Posicion X
Printer.Font.Size = 8
Printer.Font.Underline = True
Printer.PaintPicture "nombre del Picture box"
Printer.EndDoc
End Sub

Si puede alguien revisar y hacerme ver la LUZ o enviarme otra forma mas simple de hacer esta tarea se los estare muy agradecido.
Muchas gracias

Printer.PaintPicture Picture1.Picture, 10, 10, 2355, 1035

'envia a la impresora predeterminada del sistema,
'la propiedad picture del control picture1, y los
'numero 10,10, son la posicion donde tiene que ir
'el dibujo en el papel (porque lo enviamos a Printer,
'si lo enviaramos a form1, los nuneros serian la
'posicion del formulario. Los numero indican Horizontal
'y vertical, y la medida, debeis elegirla en la
'propiedad ScaleMode del objeto Picture1. Las cantidades
'2355,1035 indican el hancho y alto de la imagen.