Tampilan Command Setelah di Load
 Tampilan Command setelah Di Clik
Berikut Ini Scriptnya Simple Nan Elegant

Private Sub Command1_Click()
Command1.Picture = Image1.ListImages(2).Picture
End Sub

Private Sub Form_Load()
Command1.Picture = Image1.ListImages(1).Picture
End Sub

Untuk Image Listnya Harap Isi Dolo?

Salama kode simple Vb 

Untuk script Bisa di Download diSini

[Joko-Sugiono]