Membuat Tulisan Berjalan Pada Caption Sebuah Form

Buat form

Tambahkan komponen timer pada form.

Kalau udah silahkan  tinggal kasih koding sebagai berikut
Private Sub Form_Load()
Timer1.Interval = 500
Form1.Caption = ” .:: Belajar Visual Basic ::. “
End Sub
Private Sub Timer1_Timer()
a = Left(Form1.Caption, 1)
b = Len(Form1.Caption)
c = Right(Form1.Caption, b – 1)
Form1.Caption = c + a
End Sub


Nb From1 dan Timer1 Tergantung form dan timer yang kita gunakan Silakan cek di Propertis Form
kasih Nilai di interval  sesuai ke inginan