Copy Paste kode dibawah ke jendela kode form Visual basic.
'++++++++++ Awal Kode ++++++++++++
'Kalimat Berjalan
' Dibutuhkan 1buah Timer dan 1 buah label
Private Sub Form_Load()
Label1.Caption = "Belajar Visual Basic, membuat huruf berjalan. "
Label1.AutoSize = True
Timer1.Enabled = True
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
Jalan$ = Label1.Caption
Jalan$ = Mid$(Jalan$, 2, Len(Jalan$)) & Left$(Jalan$, 1)
Label1.Caption = Jalan$
End Sub
'+++++++++++++ Akhir Kode ++++++++++++++++
GoodLuck
Tidak ada komentar:
Posting Komentar
Tinggalkan pesan anda disini.