No puedo encontrar la imagen al cargarla en vb. Copié la dirección del archivo en las propiedades y agregué la extensión.
Puede agregar un control común CommonDialog en el widget y pegar el siguiente código
Private Sub Command1_Click()
Dim l As String
CommonDialog1.ShowOpen p>
L = CommonDialog1.ShowOpen()