كد رنگ در اكسس

[rockboy_62]

تو برنامه هايي مثل فتوشاپ يا html كد رنگ به اين صورت هست.

#EAF2FBالان من ميخوام همين رنگ رو در اكسس استفاده كنم.چطوري ميتونم اينو به كدي كه قابل دريافت در اكسس باشه تبديل كنم؟
الان من از كدهايي مشابه اينها براي تغيير رنگ باكس استفاده ميكنم.ميخوام به جاي blue اين رنگي كه گفتم رو بذارم.

Private Sub text1_GotFocus()
Me.text1.BackColor = vbBlue
End Sub
Private Sub text1_LostFocus()
Me.text1.BackColor = vbWhite
End Sub

[shaghaghi]

سلام
کد هایی که بصورت EAF2FB# هستند، یک عدد از نوع هگز می باشند، که شامل کد RGB یک رنگ می باشد بطوریکه دو رقم سمت چپ کد رنگ قرمز، دو رقم وسط کد رنگ سبز و دو رقم سمت راست کد آبی آن رنگ بصورت هگز می باشد.
برای اینکه در محیط VB یا VBA با مقادیر هگز کار کنیم، میبایست قبل از هر کد هگز کاراکترهای H& را بنویسیم تا کامپایلر متوجه شود که منظور ما استفاده از کد هگز است.
بعنوان مثال: اگر کد رنگی را که مثال زدید را بخواهیم پیاده سازی کنیم، کافیست کاراکتر # آنرا با H& جایگزین نماییم که بدین صورت خواهد شد:


Me.text1.BackColor=&HEAF2FB