Membuat Tulisan Berjalan di VB 6

Hay sobat blogger, kali ini saya akan berbagi cara membuat tulisan berjalan di VB 6..
Okey kita langsung saja ke TKP :D

Langkah 1
siapkan aplikasi VB 6
Setelah itu buatlah 1 Buah Label dan 1 Buah Timer.

Langkah 2

double klik form dan masukkan script berikut :

Private Sub Form_Load()

Label1.FontSize = 15

Label1.Font = Verdana

Label1 = "Membuat tulisan berjalan di VB oleh Bramanda"

End Sub

Private Sub Timer1_Timer()

If (Label1.Left + Label1.Width) <= 0 Then

Label1.Left = Me.Width

End If

Label1.Left = Label1.Left - 100

End Sub

Nanti susunan scriptnya akan seperti berikut :

Langkah 3

Jalankan file dengan menekan F5 atau tombol start. maka hasilnya akan sebagai berikut :