Membuat Objek (Shape) Bergerak Dari Kiri Ke Kanan VB

Hai sobat Blues Pedia, pada tutorial kali ini kita akan membuat sebuah tool box bergerak secara horizontal dari kiri ke kanan, untuk toolbox yang akan kita pakai adalah shape dan timer sebagai kunci program, untuk membuatnya silahkan pelajari tutorial berikut :

1. Jalankan VB dengan program Standar EXE.

2. Lalu tambahkan 1 buah shape dan 1 buah timer

untuk peletakan dan ukuran dari shape itu bebas, bisa anda atur sendiri sesuai keingin, tapi untuk peletakan shape akan kita atur menggunakan script, berikut properti yang harus anda ubah

Tool Box	Properties	Keterangan
Form 1	Statr Up Position	Center Screen
Shape 1	Name	Shape
	Shape	Circle
	Back Color	Biru
	Back Style	Opaque
Timer 1	Name	Timer
	Interval	10

3. Lalu tuliskan script berikut :

Dim x, y As Integer

Private Sub Form_Load()
Form1.ScaleWidth = 400 'Skala jendela form adalah 400 x 100
Form1.ScaleHeight = 100
x = 20: y = 50 'Posisi shape ketika program di jalankan ada di (20, 50)
Shape.Top = y
Shape.Left = x
Timer.Enabled = True
End Sub

Private Sub Form_Unload(Cancel As Integer)
Timer.Enabled = False
End Sub

Private Sub Timer_Timer()
x = x + 1 'Posisi x shape akan terus di tambah 1
If x > 380 Then x = 0 'Jika posisi shape x lebih dari 380 maka posisi shape x akan kembali ke 0
End If
Shape.Top = y
Shape.Left = x
Shape.Refresh
End Sub

Your Text Here

4. Jalankan program

posisi awal (1)	Pergerakan (2)
Pergerakan (3)	Akhir dari pergerakan (4) dan kembali lagi ke 1

Ketika program di jalankan maka posisi shape akan berada di tepi garis kiri form, dan bergerak ke arah kanan dengan kecepatan (perubahan posisi x) 10 interval (atau 1 / 100 detik),
ketika shape sampai di garis tepi kanan form, posisi x shape akan kembali lagi ke posisi awalnya

Itulah tutorial mengenai cara membuat shape bergerak di visual basic, anda bisa mengganti tool boxnya (shape) dengan toolbox lainya, seperti Picture Box / image, dan anda hanya tinggal mengganti kata "Shape" di script dengan name dari toolbox yang di gunakan.

Sekian tutorial kali ini, semoga bermanfaat