Load file to Image control
Private Sub ComboBox1_Change() Image1.Picture = LoadPicture(ComboBox1.Text) End Sub