Langkah pertama ,Buka VB6 kamu ,pilih Standard EXE.
Masukan Timer dengan Interval 100/200.
Lalu buka View Code, masukan Script di bawah ini :
CODE :
Masukan Timer dengan Interval 100/200.
Lalu buka View Code, masukan Script di bawah ini :
CODE :
Dim nama As String
Private
Sub Form_Load() nama = " CENDHIKIA ADITYA PRATAMA "
End Sub
Private Sub Timer1_Timer()
a = Left(nama, 1)
c = Len(nama)
b = Right(nama, c - 1)
nama = b + a
Me.Caption = nama
End Sub
Sub Form_Load() nama = " CENDHIKIA ADITYA PRATAMA "
End Sub
Private Sub Timer1_Timer()
a = Left(nama, 1)
c = Len(nama)
b = Right(nama, c - 1)
nama = b + a
Me.Caption = nama
End Sub
Lalu RUN aplikasi, dan lihat pada nama Form kamu...
♠ Semoga Bermanfaat ♠
Sumber : djiesoft.blogspot.com
0 komentar:
Posting Komentar
Setelah melihat - lihat, Alangkah baiknya memberikan komentar mengenai Blog ini.
Kritik dan Saran teman-teman semua, Saya anggap sebagai masukan buat saya... terima kasih telah berkunjung