rgb and change colors

سلام.
من میخوام با rgb رنگ فرم و تغییر بدم.
مشکل دستور زیر چیه ؟

کد:

---

  Dim r, g, b As Integer
        Me.BackColor = RGB(r, g, b)

---

قبل تابع rgb باید چیزی بنویسم ؟

خب اینکه مشکلی نداره که...!؟!

دقیق تر توضیح بدید لطفاً...!؟!

شما با کجاش مشکل دارید...؟!؟!

دوست عریز کدی که نوشتی عیبی نداره.
ولی چرا اینجور متغیر تعریف کردی؟ اینجوری بیسیک یکی رو از نوع integer میگیره و اون دوتا درو از نوع Variant و فضای زیادی از ram اشغال میشه:46:

دوست عزیز چرا به r,g,b مقدار ندادیمثل کد زیر

کد:

---

r = 50
g = 20
b = 180
Form1.BackColor = RGB(r, g, b)

---

اگه میخوای به طور تصادفی رنگ انتخاب بشه این کد رو به کار بگیر:

کد:

---

Randomize Timer

r = int(rnd()*255)
g =  int(rnd()*255)
b =  int(rnd()*255)
Form1.BackColor = RGB(r, g, b)

---

موفق باشید