Cara Membuat Tulsan Berjalan dan Berwarna di Visual Basic 6 (VB6)

Cara membuat efek tulisan berjalan dengan warna di Visual Basic 6.0 / VB 6

Bagi yang belum punya Visual Basic 6.0 bisa di download dibawah ini
Download Visual Basic 6.0 Enterprise Edition Service Pakc 6 (SP6)
Download Visual Basic 6.0 SP6 
Download Visual Basic 6.0 Portable

Buat project baru kemudia pilih standart.exe

Tambahkan 1 buah Label dan Timer di form tersebut :

 

 Setting Timer dengan interval = 100

Kemudian klik kanan Form pilih view code atau dengan cara double klik pada Form masukkan code berikut kedalam form tersebut :

Private Sub Timer1_Timer()

Label1.ForeColor = RGB(Rnd * 250, Rnd * 250, Rnd * 250)

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

        Label1.Left = Me.Width

    End If

    Label1.Left = Label1.Left - 100

End Sub

 

#Notice jika ingin copy-paste artikel ini silahkan sertakan dan cantukan sumber link kedalam postingan kalian.

Thank's for reading the articelCara Membuat Tulsan Berjalan dan Berwarna di Visual Basic 6 (VB6) .If You want to copy paste your website please tag my link Cara Membuat Tulsan Berjalan dan Berwarna di Visual Basic 6 (VB6) Intro My Website.
<a href="https://operaterpm.blogspot.com/2013/12/cara-membuat-tulsan-berjalan-dan.html">Cara Membuat Tulsan Berjalan dan Berwarna di Visual Basic 6 (VB6)</a>