amir_adam87

لا يوجد اجابه بارك الله بكم

ارجو الافاده بارك الله بكم

ولكن اريده النموذج يظهر مثل هذا

شكرا ياخي على المداخله ولكني اريد اللون يظهر بالتكست بوكس وليس بليبل بارك اتلله بك

تم عمل هذا Private Sub اسم_ودرجة_وللون_اللون__GotFocus() اسم_ودرجة_وللون_اللون_.BackColor = vbكود_اللون End Sub الكود ولكن تم تطبيقه على كل الالوان ولكني اريده كلا على حدا

السلام عليكم ورحمة الله وبركاته لدي جدول به ثلاث حقول الاول رقم معرف_والثاني _رقم_أوكود_اللون_والثالث اسم اللون ويحمل اللون نفسه ومرفق معه شيت اكسل يحتوي على رقم اللون واسم اللون تم تحميله من احد المواقع وها هوا ربط الموقع الخارجي تم عمل الجدول وتت الحاق بيانا…

أخي الكريم السلام عليكم ورحمة الله وبركاته رااجع هذا الربط وسوف تجد كل ماتريده وهوا للاخ والاستاذ محمد فؤاد ترك /index.php/topic/125583-%D9%83%D9%8A%D9%81-%D8%AA%D8%A8%D9%86%D9%8A-%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D8%AC-%D9%85%D8%AE%D8%A7%D8%B2%D9%86-%D9%88%D9%85…

ربنا يحفظك يارب اشكرك سوف يتم تحميله بارك الله بك

لا يوجد لدي على الجهاز Microsoft Agent 2.0 هل سوف يتم تحميله

هل يوجد ضم مكتبات لتشغيلها ام ماذا بارك الله بكم

ألاخت الفاضله بارك الله بك قابلتني مشكله وهي عند الضغط على أظهار مساعد الاوفيس هذه الصوره المرفقه

XP English amir.bmp

السلام عليكم ورحمة الله وبركاته اريد من الاخوه الافاضل تشغيل ملف التعليمات اوفس 2003 ( Microsoft Agent ) مثل اوفس اكس بي وهل يدعم اوفيس 2003 هذا لملف تلقائيا ام يحتاج الى برمجته

هل هذا الكود اضعه لجلب HSL Private Sub ImageFrame1_Click() On Error Resume Next Dim a As Long a = GetCursorPos(p) Me.Text1 = GetPixel(GetDC(0), p.X, p.y) 'احمر Me.Text24 = Me.Text1 Mod 256 'اخضر Me.Text26 = Int(Me.Text1 / 256) Mod 256 'ازرق Text28 = Int(Me.Tex…

الاخت الفاضله تم التجربه بالفعل ونجاح المطلوب ولكن يوجد شيء بسيط جدا وهوا لماذا لم تفعلي Hue: Sat: Lum:

انا بجد مش عارف اقول لحضرتك ايه غير ان ربنا يجعله في ميزان حسناتك وياااااااااااااااارب يحفظك لينا

نعم الاخت زهره عند الضغط على اي ماكن بالصورة توضح لي درجة اللون بارك الله بكم على تعاونكم معنا وجزاكم الله خير الجزاء

اخي جعفر لماذا هذا الخطاء

تم تحميل البرنامج ومن ثم تنم تنصيبه بتلك الصوره ثم ظهر لي هذا الخطاء بارك الله بك