Visual Basic - Cancelar el ShowPrinter

Tengo un CommondDialog que al elegir una impresora y aceptarlo se me abre la ventana de un CrystalReport.Lo que me pasa es que si le doy a cancelar al CommondDialog también se me abre la ventana del CrystalReport.¿Cómo lo puedo solucionar?
Gracias

para poder capturar el cancelar en el CommonDialog debes usar una secuencia de error, mejor te doy un ejemplo

CommonDialog1.Flags = cdlPDHidePrintToFile
CommonDialog1.Flags = cdlPDPageNums
CommonDialog1.CancelError = True
On Error GoTo errorimpresion:
CommonDialog1.ShowPrinter ´ lanzas la ventada de impresion
On Error GoTo 0
CrystalReport1.Destination = crptToWindow
CrystalReport1.WindowTitle = " Vista Preliminar de Impresion"
CrystalReport1.Action = 0
Exit Sub
errorimpresion:
If Err.Number = 32755 Then ´ Presiono Cancelar en CommonDialog
On Error GoTo 0
Else
MsgBox "Ha ocurido un error No Definido Numero :" & Err.Number & " Descripcion :" & Err.Description & ""
On Error GoTo 0
End If
End Sub

Espero que te Sirva


Saludos desde Chile.......