Visual Basic - Guardar el dibujo hechosobre un picturebox control

Hola:
he creado una aplicación de dibujo, que permite hacer trazos de manera libre sobre un control Picture Box. El problema es que aunque he puesto la rutina típica de Guardar cómo el dibujo no se llega a guardar. Aquí está la parte concreta del programa:

Private Sub mnuFileSaveAs_Click()
Dim sFile As String

With dlgCommonDialog
.DialogTitle = "Guardar"
.CancelError = False
'Pendiente: establecer los indicadores y atributos del control common dialog
.Filter = "Imágenes (*.bmp;*.ico)|*.bmp;*.ico|" & _
"Todos los archivos (*.*)|*.*"
.ShowSave
If Len(.FileName) = 0 Then
Exit Sub
End If
sFile = .FileName
End With
SavePicture Picture1.Image, dlgCommonDialog.FileName

End Sub

¿En qué me he equivocado?
Gracias por adelantado.

Me parece que te falta el nombre del drive antes de commondialog.filename