Vb.net Ders #1 Yanıp Sonen Label Yapıyımı

[E-Tardis]

Kod: Tümünü Seç Tümünü Kopyala

Timere Girilcek Kod -   r = Int(Rnd() * 256)
[size=small][font=Monaco, Consolas, Courier, monospace]        g = Int(Rnd() * 256)[/font][/size]
[size=small][font=Monaco, Consolas, Courier, monospace]        b = Int(Rnd() * 256)[/font][/size]
        Label1.ForeColor = Color.FromArgb(r, g, b)

Kod:

Kod: Tümünü Seç Tümünü Kopyala

Form 1 Loada Girilcek Kod - Timer1.Enabled = True
       Timer1.Interval = 10

Kod:

Kod: Tümünü Seç Tümünü Kopyala

Public Class Form1 un altına girilcek kod 
   Dim r, g, b As Integer

YAPAMAYANLAR İCİN RESİM: