TİMER NEDİR?

[ocamsul]

TÝMER NEDÝR?

Dolaştığım kod sitelerinde bu (TİMER)'e çok rastladım. nedir bu arkadaşlar? excel de nerede bulunur. vb.

 

[Levent Menteşoğlu]

Timer; zaman sayacıdır, vba da hazır timer nesnesi yok,bunu kod yazarak elde etmek mümkün. Bununla ilgili olarak aşağıdaki linki inceleyin.

http://www.excel.web.tr/viewtopic.php?t=1159

 

[ocamsul]

leventm peki aşağıdaki kodları inceledim. biraz kavradım ama. siz bir sıralama yapıp bunu form üzerinde uygularmısınız.


VBde kayan yazı örneği..

öncelikle 3 adet label acıyoruz,alt alta gelecek şekilde..yazı büyüklüklerini ve yazı stillerini istediğiniz gibi ayarlayabilirsiniz properties menüsünden.. bir adet timer ekliyoruz.. form_load bölümüne
Private Sub Form_Load()

Label1(0).Caption = "KAYAN YAZI"

Label1(1).Caption = "UMARIM BEÐENİRSİNİz"

Label1(2).Caption = "VİSUALBASİC SEVENLER İÇİN"

Label1(3).Caption = "EÐLenCeLi"

Label1(4).Caption = "KOLAY GELSİN)"


End Sub

yazıyoruz..
daha sonra timer bölümüne de

Private Sub Timer1_Timer()
Label1(0).Top = Label1(0).Top - 20
Label1(1).Top = Label1(1).Top - 15
Label1(2).Top = Label1(2).Top - 15
Label1(3).Top = Label1(3).Top - 15
Label1(4).Top = Label1(4).Top - 10



If Label1(4).Top <= 0 Then
Label1(0).Top = 1700
Label1(1).Top = 2080
Label1(2).Top = 2500
Label1(3).Top = 2860
Label1(4).Top = 3450

End If
End Sub