Skift billede i en Picturebox !!!!

Jeg skal have skiftet et billede i en picturebox - men kan ikke få den til det !!! Har noget i retningen af :
Private Sub Command1_Click()
If List1 = "Egypten" Then
    Picture1.Picture = ("Egypten.gif")
End If
End Sub

Har også prøvet med Full path til billedet.

Mvh
Smolf