AccessTr.neT
Label da kayan yazı - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html)
+--- Forum: Visual Basic 6 Örnekleri ve Uygulamaları (https://accesstr.net/forum-visual-basic-6-ornekleri-ve-uygulamalari.html)
+--- Konu Başlığı: Label da kayan yazı (/konu-label-da-kayan-yazi.html)

Sayfalar: 1 2


Cvp: Label da kayan yazı - chopper07 - 03/05/2009

(01/05/2009, 14:55)goodfalles yazdı: Label1.caption vb.nette .text olcak . )
vb.6 kodları bunlar sanırm

Düzeltme için teşekkürler. Ayrıca sitede verdiğim tüm örnekler, dersler, uygulamalar VB6 içindir.


Cvp: Label da kayan yazı - PaTRoNa - 14/02/2010

Label1.Left = ScaleLeft
Label1.Width = Me.ScaleWidth
Timer1.Interval = 100
End Sub

Private Sub Timer1_Timer()

On Error Resume Next
Label1 = Mid(Label1, 2, Len(Label1) - 1) + Left(Label1, 1)

End Sub

kalın olarak belırttıgım kodu bır eventın altına yazmalısın mesela butonun olayına yazarsan oluyor.veya Form Load kısmına yazarsan olur