yukarı kayan yazı

eyler visual basic de yukarı kayan yazı nasıl olur işte altta kodlar










Bir Label, Bir Timer oluşturun ve bu kodları yapıştırınca formunuzda aşağıdan yukarıya doğru kayan bir yazı belirecektir




Private Sub Form_Load()
Label1.Top = 1045
Label1.Caption = "ßy_Yeternet" + Chr(13) + Chr(10) + "[Linkleri görebilmek için üye olun veya giriş yapın.]
Timer1.Interval = 2
End Sub

Private Sub Timer1_Timer()
If Label1.Top = -1045 Then Label1.Top = 1045
Label1.Top = Label1.Top - 2
End Sub



alıntıdır