Selamat datang di blog Muslih System , pada postingan kali saya akan membahas mengenai cara membuat tulisan berjalan pada form VB6, trik ini dibuat agar tampilan form lebih menarik. Untuk langkah-langkahnya sebagai berikut:
- Buka VB6 nya lalu pilih Standard Exe.
- Kemudian ubah Caption Form dengan “Contoh tulisan berjalan” atau apa saja menurut keinginan kita.
- Masukan sebuah componen Timer dan ubah intervalnya menjadi 100
- Double Click pada timer dan masukan sintak berikut ini:
Private Sub Timer1_Timer()
a = Form1.Caption
b = Left(a, 1)
C = Right(a, Len(a) - 1)
Form1.Caption = C + b
End Sub
- Jalankan programnya maka kita akan melihat tulisan pada caption form akan bergerak dari kanan ke kiri.
Bagi yang mau source code vb-nya silahkan download melalui link di bawah ini:
Selamat mencoba & Semoga bermanfaat.
0 komentar:
Posting Komentar