Judul Form Berjalan

Berikut contoh langkah pembuatan agar judul / teks dari suatu Form dapat berjalan :
Buat Project baru dengan 1 Form.
Tambahkan Kontrol ke Form1 :
1 Timer (Timer1).
Ubah nilai properti dari Kontrol Timer1 :
Enabled = True
Interval = 200.
Tulis kode ini di event (Declarations) dari Form1 :

Dim Judul As String
Tulis kode ini di event Timer1_Tick :
Judul = "Ini adalah judul dari Form yang sedang berjalan. "
Tulis kode ini di event Timer1_Tick :
'membatasi hanya 20 karakter
Me.Text = Strings.Left(Judul, 20)
Judul = Strings.Right(Judul, Judul.Length - 1) & Strings.Left(Judul, 1)