الكمبيوتر التعليمى - إدارة منية النصر التعليمية

من موقع الحدث ندعوك - تابع ما انجزنا - دعواتنا لكم بوقت ممتع -تفيد وتستفيد - فخيركم من تعلم العلم وعلمه
مدير الموقع

انضم إلى المنتدى ، فالأمر سريع وسهل

الكمبيوتر التعليمى - إدارة منية النصر التعليمية

من موقع الحدث ندعوك - تابع ما انجزنا - دعواتنا لكم بوقت ممتع -تفيد وتستفيد - فخيركم من تعلم العلم وعلمه
مدير الموقع

الكمبيوتر التعليمى - إدارة منية النصر التعليمية

هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.
الكمبيوتر التعليمى - إدارة منية النصر التعليمية

موقع خدمى لعلوم الحاسب ومناهج المدارس

الكمبيوتر التعليمى ادارة منية النصر اهلآ وسهلآ بك فى بيتك الثانى مبرمجو الكمبيوتر التعليمى ادارة منية النصر - http://mobarmg.roo7.biz/

    مثال على دالة RGB

    sayed
    sayed
    DR COMPUTER
    DR COMPUTER


    عدد المساهمات : 450
    تاريخ التسجيل : 20/03/2009
    العمر : 68
    الموقع : computereadara.yoo7.com

    مثال على دالة  RGB Empty مثال على دالة RGB

    مُساهمة من طرف sayed السبت مايو 09, 2009 10:38 am

    وده مثال علي الداله RGB
    نحتاج الي 3 TextBox و 4 Label و 3 Command
    ارسم الادوات كما بالشكل :-

    [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

    قم بكتابه الاكواد الاتيه في زر المزيج
    اقتباس:
    Dim k, l, n As Integer
    (k = Val(Text1.Text
    (l = Val(Text2.Text
    (n = Val(Text3.Text
    (Form1.BackColor = RGB(k, l, n

    اكتب الاكواد الاتيه في زر جديد
    اقتباس:
    "" = Text1.Text
    "" = Text2.Text
    "" = Text3.Text

    وطبعا الكود اللي احنا عارفينه بتاع خروج
    اقتباس:
    END

    ثم قم بتشغيل البرنامج ستري المزيج من الارقام اللي هتحطها لون الفورم هيتغير وباردو اوعي تكتب حرووووووووووووف اوك
    [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
    alien

      الوقت/التاريخ الآن هو الجمعة مارس 29, 2024 12:59 am