Cara Membuat LABEL/TULISAN Berjalan-Jalan dalam VB 6


Langkah pertama buat form baru..
Pilih Label Dan Tulis AKU SAYANG KAMU..
Setelah itu Pilih Timer.. atur intervalnya 100 (bebas, semakin dikit semakin asik)

Tulis ini Kedalam Listing ;
Private Sub Timer1_Timer()
If Label1.Left > Form1.Width Then
Label1.Left = -Label1.Width
Else
Label1.Left = Label1.Left + 200
End If
End Sub

Seru bukan.. AKU SAYANG KAMU will continue to run in your heart,,

hingga aku mati..
Yuk terus di perdalam..

0 komentar:

Posting Komentar

 

Coffee Tiwus © 2011 Design by Putro Sapno Pamungkas