MEMBUAT TEKS BERJALAN MENGGUNAKAN VISUAL BASIC 6.0

Teks berjalan atau biasa disebut dengan marquee sering kita jumpai ada di website. Dengan memanfaatkan bahasa pemrograman web, kita bisa dengan mudah membuatnya. Namun, kita juga bisa membuat teks berjalan/marquee menggunakan Visual Basic 6.0. Caranya adalah sebagai berikut:

• Bukalah program Visual Basic, kemudian pilih Standar.exe

• Kemudian tambahkan objek Timer pada form yang ada. Atur interval Timer menjadi 10, atau bisa sesuai kebutuhan. Tambahkan juga tulisan yang akan kita buat sebagai teks berjalan dengan menggunakan objek Label. 

 

• Kemudian klik dua kali pada objek Timer dan masukkan kode-kode berikut :

Private Sub Timer1_Timer()

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

   Label1.Left = Me.Width

   End If

   Label1.Left = Label1.Left – 25

End Sub

• Kemudian klik tombol Run untuk menjalankan program. Selamat mencoba.

Posted in: tutorial, vb, vb 6, visual basic