Membuat Teks Berjalan Di Vb 06

Membuat Teks Berjalan Di Vb 06

Simak dalam membuat teks berjalan di vb 6 sebagai berikut :

1. buat form nya dan ini contoh nya
   
   
   
   
2. isi rogram di timer 1 Klik 2 kali ada Icon timer
   
   
   
   Private Sub Timer1_Timer()
   
   Label1.Caption = Right(Label1.Caption, Len(Label1.Caption) - 1) + Left(Label1.Caption, 1)
   Me.Caption = Right(Me.Caption, Len(Me.Caption) - 1) + Left(Me.Caption, 1)
   
   End Sub
   
   
3. Setelah Itu Run
   
   
   
   

semoga bermanfaat