M.Kemal ATATÜRK
Süper Üye
[font=Tahoma, Arial, sans-serif]Merhaba arkadaşlar ben HardPlayer labelleri yanıp sönen yapmak için kolay bir yöntem var Yapamayanlara Hazır Proje Vercem Tek yapmanız Gereken Yorum yapın ...[/FONT]Vede REP + Teşekürü Esirgemeyin
İçerik açılmıştır. Yorum yazdığınız için teşekkürler.
[font=Tahoma, Arial, sans-serif]---öncelikle 1 label 1 timere ihtiyacımız var
---labele istediğiniz yazıyı yazın ve ForeColor yani rengini beyaz yapın
------Daha Sonra
Public Class Formun altına gelecek kod:
[/FONT]
Kod:
[font=Tahoma, Arial, sans-serif]
Form1 loada gelecek kod:
[/FONT]
Kod:
[font=Tahoma, Arial, sans-serif]
Timere Gelecek Kod:
[/FONT]
Kod:
Proje:
İçerik açılmıştır. Yorum yazdığınız için teşekkürler.
[font=Tahoma, Arial, sans-serif]---öncelikle 1 label 1 timere ihtiyacımız var
---labele istediğiniz yazıyı yazın ve ForeColor yani rengini beyaz yapın
------Daha Sonra
Public Class Formun altına gelecek kod:
[/FONT]
Kod:
Kod:
Dim r, g, b As Integer
[font=Tahoma, Arial, sans-serif]
Form1 loada gelecek kod:
[/FONT]
Kod:
Kod:
Timer1.Enabled = True
Timer1.Interval = 10
[font=Tahoma, Arial, sans-serif]
Timere Gelecek Kod:
[/FONT]
Kod:
Kod:
r = Int(Rnd() * 256)
g = Int(Rnd() * 256)
b = Int(Rnd() * 256)
Label1.ForeColor = Color.FromArgb(r, g, b)
Proje:
Bağlantıları görmek için lütfen
Giriş Yap