View Full Version : تغییر رنگ lable.ForeColor
VirGil
پنج شنبه 28 خرداد 1388, 22:27 عصر
سلام خدمت همگی.
چه جوری میشه رنگ lable.ForeColor هر مثلا 30 ثانیه به یه رنگ تصادفی دیگه تغییر کنه؟
البته کار با تایمر و که بلدم.:دی
sari-1369
جمعه 29 خرداد 1388, 01:36 صبح
یه تابعی بود ( فکر کنم RGB ) که 3 تا مقدار اینتیجر ( قرمز ، سبز ، آبی ) می گرفت و در نهایت یه رنگ تحویل می داد .
برای اینکه تصادفی باشه 3 تا عدد تصادفی با تابع ( فکر کنم randimiz ) تولید کنید و برای تابع قبلی بفرستید .
sari-1369
جمعه 29 خرداد 1388, 16:22 عصر
دوست عزیز ، بی خیال پست قبلی بشو . :لبخند:
اینم جواب سوالتون .
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim red, green, blue As Integer
red = Rnd() * 255
green = Rnd() * 255
blue = Rnd() * 255
Label1.BackColor = Color.FromArgb(red, green, blue)
End Sub
Mani_rf
شنبه 30 خرداد 1388, 17:34 عصر
جواب قبلی درسته فقط به جای Backcolor باید ForeColor بنویسی دیگه.
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.