Merhaba Arkadaşlar,
Bugün sizlere yanıp sönen textbox yapımını anlatıcam.
Bunun için gerekenler :
1 adet commandButon,1 adet timer,1 adet text
Bugün sizlere yanıp sönen textbox yapımını anlatıcam.
Bunun için gerekenler :
1 adet commandButon,1 adet timer,1 adet text
Kod:
Private Sub Command1_Click()
Timer1.Interval = 500
End Sub
Private Sub Timer1_Timer()
Dim c
c = Text1.BackColor
Text1.BackColor = Text1.ForeColor
Text1.ForeColor = c
End Sub
0 yorum:
Yorum Gönder
Yorumlarınızda lütfen Türkçe ' yi güzel kullanınız.
Bilgili Yayın Yönetimi...
Dikkat ! : Küfür yada uygunsuz içerik içeren yorumlar yasaktır.Bu tür yorumlar site yönetimi tarafından tespit edilip silinmektedir.Fakat gözden kaçan yorumları ctn@turk.tc veya tospmailbomber@gmail.com adreslerinden bizlere iletebilirsiniz.