رفتن به مطلب
  • 0

ست کردن رنگ رندوم


Forutan

سوال

سلام دوستان

من 5 تا رنگ دارم میخوام بصورت رندوم هر ثانیه ست شن روی بکگراند یک لیبل

چطور میتونم رنگ هارو رندوم از یک آرایه بگیرم؟

ممنون

لینک ارسال
به اشتراک گذاری در سایت های دیگر

1 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

سلام

این آرایه الان دارای پنج تا رنگ هست:

Dim MyColors() As Int=Array As Int(0xFFFF0000,0xFF00FFA7,0xFFFFA500,0xFF42FF00,0xFF9900FF)

برای اینکه یکی از این رنگ هارو به صورت تصادفی از آرایه بیرون بکشیم و به لیبل بدیم، به این شکل عمل میکنیم:

Label1.Color=MyColors(Rnd(0,5))

برای اینکه هرثانیه یکی از رنگ ها روی لیبل ست بشن باید از تایمر استفاده کنین و در رویداد تیک تایمر هم کد بالا رو قرار بدین.

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...