04-10-2017, 04:30 AM
Kod:
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:
Form 1 Loada Girilcek Kod - Timer1.Enabled = True
Timer1.Interval = 10
Kod:
Kod:
Public Class Form1 un altına girilcek kod
Dim r, g, b As Integer
YAPAMAYANLAR İCİN RESİM: