Membuat Label Berjalan atau Bergerak di Form – Kode VB Net

Label Berjalan VB .Net

Cara membuat label berjalan atau bergerak di form visual basic .net amatlah mudah. Silahkan ikuti tutorial berikut ini :

1. Tambahkan kontrol berikut kedalam form anda:

• Satu buah Label (Label1) dan
• Satu Timer (Timer1)

2. Ubah nilai properti dari kontrol Timer1 sebagai berikut :

• Enabled = True
• Interval = 10

3. Tulislah salah satu kode berikut di event Timer_Tick :

'Kode label bergerak dari kanan ke kiri
Label1.Left -= 2
If Label1.Left = -(Label1.Width) Then Label1.Left = Me.ClientRectangle.Width

'Kode label bergerak dari kiri ke kanan
Label1.Left += 2
If Label1.Left = Me.ClientRectangle.Width Then Label1.Left = -(Label1.Width)

'Kode label bergerak dari bawah ke atas
Label1.Top -= 2
If Label1.Top = -(Label1.Height) Then Label1.Top = Me.ClientRectangle.Height

'Kode label bergerak dari atas ke bawah
Label1.Top += 2
If Label1.Top = Me.ClientRectangle.Height Then Label1.Top = -(Label1.Height)