Hola ^_^
Sebelum Ane Tidur.. Ane Mau Share Tentang Visual Basic 6.0 Nih..
Sebelum Ane Kasih Tau Caranya.. Liat Gambar Ini Dulu Biar Jelasnya :) :)


Kurang Lebih Kayak Gitu Entar.. Sorry Bukan Video .. hehehe.
Yuk Cekidot..
Step :
•> Buat " LABEL " dan "
TIMER "
•> Nah Buat Kodingnya Sekarang..
Koding Pertama :
•> " FORM "
Diisi Dengan :
Private Sub Form_Load()
Label1.Caption = ""
Timer1.Interval = 400
End Sub
•> " Timer 1 "
Diisi Dengan :
Private Sub Timer1_Timer()
Dim MyWord
Static i As Integer
i = i + 1
MyWord = Array("M", "R",
"R", "-", "C", "y", "b",
"e", "r", ".", ".", ".")
Label1.Caption = Label1.Caption
& MyWord((i) - 1)
If i = 12 Then
i = 0
Label1.Caption
= ""
End If
End Sub
•> Nah Sekarang di Test Tekan " F5 "
Source : MRR Cyber

Tidak ada komentar:
Posting Komentar