VBA/Excel/Access/Word/Forms/Image

Load file to Image control

   <source lang="vb">

    Private Sub ComboBox1_Change()
        Image1.Picture = LoadPicture(ComboBox1.Text)
    End Sub
</source>