Visual Basic - COMMON DIALOG Ayuda?

si uso este control para abrir archivos como hago para que cuando le de cancelar no me lance un error

Solo debes controlar el error con un

On error goto <Etiqueta>

<Etiqueta>:
y aqui preguntas por el error y lo controlas

Private Sub Abrir()
On error GoTo Fin
With Dialogo
.ShowOpen
if Len(.Filename)=0 then exit sub
'Escriba aqui la utilidad que le va a hacer al archivo a abrir
End With
Fin:
End Sub