MEMBUAT PROGRAM ANIMASI GERAK DENGAN VB

1. Buat project baru, kemudian tambahkan kontrol Image, CommandButton dan Timer pada form.dengan merubah property seperti tabel berikut:

Kontrol	Properti	Setting
Image	Picture Strecth	Pilih Gambar yg diingikan True
Command1	Name Caption	CmdMulai Mulai
Timer	Enabled Interval	False 100

2. 

2.2.   Atur Desain form seperti gambar berikut :

3. Klik ganda kontrol Timer, kemudian ketik program berikut :

    Image1.Move Image1.Left - 100, Image1.Top
If Image1.Left + Image1.Width <> then
Image1.Left = ScaleWidth 
End If

   Perintah diatas akan menyebabkan objek bergerak kearah kiri, setelah sampai pada tepi form, objek akan muncul kembali dari tepi kanan form sehingga objek akan terus bergerak secara berulang-ulang.

4.  Klik ganda CmdMulai,Kemudian Ketik kode program berikut :
Timer1.Enabled= True ‘mengaktifkan Timer'

5. Jalankan program dan coba klik tombol Mulai untuk menjalankan animasi objek.