I have tried this but it flickers when changing.
Form is Black Background
Code:'Form keypress event
Image1.visible=false
Set Image1.Picture = nothing
Select Case myAsci
Case 97
Set Image1.Picture = LoadPicture (myPathPic)
Image1.visible = true
Case bla bla
etc.
End Select
