agregas en tu menu ó en un boton lo siguiente :
Previo agregas los Microsoft CommonDialog (control + t)
Código:
Private Sub cambiafondo_Click()
CommonDialog1.DialogTitle = "Seleccione una imagen"
CommonDialog1.Filter = "Archivos Jpg|*.jpg|Archivos Bmp|*.bmp|Archivos Gif|*.gif|Archivos de íconos|*.ico|Todos los Archivos|*.*"
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
picStretch.Picture = LoadPicture(CommonDialog1.FileName)
Call redimensionarImagenMDIForm
End If
End Sub