Form Başlığında Kayan Yazı

Formunuza 1 adet Timer ekleyin. Sonra Imports vb = Microsoft.VisualBasic i ekleyin.
Aşağıdaki kodları formunuza ekleyin.

Imports vb = Microsoft.VisualBasic
Public Class Form1
Dim i As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Interval = 50
Timer1.Start()
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
i = i + 1
Me.Text = vb.Left("Merhaba Dünya...Bahadır ŞAHİN", i)
If i > 100 Then
i = 0
End If
End Sub
End Class