Membuat Teks Berjalan Di VB

Kalau membuat teks dengan label di VB itu udah bisa dilakukan tapi kali ini kita akan membuat teks berjalan di VB dengan bantuan komponen timer. contoh tampilan yang akan kita buat adalah sebagai berikut :

Dimana yang akan kita buat berjalan itu adalah Teks dengan tulisan BIODATA MAHASISWA, misalnya tulisan tersebut kita buat dengan komponen label1, maka listing untuk timernya adalah (jangan lupa ya tambahkan komponen timer diform anda dan setting itervalnya menjadi 10) kemudia kita masukan kode :

Private Sub Timer1_Timer()
If Label1.Left = -2895 Then Label1.Left = 7875
Label1.Left = Label1.Left - 5
End Sub

Penejelasannya adalah :
Label1.left= -2895, -2895 merupakan width dari label1
Label1.left= 7875, 7875 merupakan width dari form
Label1.left - 5, 5 merupakan pengaturan kecapatan pergerakan teks yang akan dijalankan

Mungkin itu saja yang dapat disampaikan, semoga bermanfaat.... terus belajar...... gapai cita-cita..........!!!!

Share this post