crazy-man

أختي العزيزة جربي المثال المرفق و عسى الله يشتغل :) visual.zip

لا يا أخ عبد العليم هو يقصد أن الكود في زر الخروج هو End للخروج من البرنامج لكن رغم ذلك لم أستطع تحديد المشكل !!!!!!!

أختي حملي الملف الأخير أنا لا أدري كيف حمل 3 مرات

أختي عهود خطأك كان انك تكتبين أسم الصورة "Pic1" ثم I و هذا خطأ يجب عليك كتابة اسم الصورة هكذا "Pic" ثم I أنا أرفقت لكي تصحيح الكود و على فكرة لو كنت تريدين أن تتعاملي مع ملفات موجودة في نفس مجلد البرنامج فما عليكي سوى أستعمال App.Path و هذه ستعطيك مسار البرنام…

أختي عهود خطأك كان انك تكتبين أسم الصورة "Pic1" ثم I و هذا خطأ يجب عليك كتابة اسم الصورة هكذا "Pic" ثم I أنا أرفقت لكي تصحيح الكود و على فكرة لو كنت تريدين أن تتعاملي مع ملفات موجودة في نفس مجلد البرنامج فما عليكي سوى أستعمال App.Path و هذه ستعطيك مسار البرنام…

بسم الله الرحمن الرحيم مرحبا بك أخي العزيز عاشق الفي بي بالنسبة للأداة تايمر فهي أداة بسيطة تقوم بتنفيذ كود معين بفارق وقت محدد و خصائصها المهمة هي : Enabled و هي خاصية Boolean يعني تكون اما True or False اذا كانت True فالأداة مشتغلة اما اذا كانت False فالأداة…

أخت عهود لو ممكن تعطينا الخطأ اللي يعطيك البرنامج أو تحطي المشروع اللي عملتيه حتى أستطيع تصليحه و شكرا

على ما أظن يجب وضع الكود في حدث Form_QueryUnload فاذا اختار المستعمل عدم الأغلاق تستعمل بارامتر فيها اسمه Cancel لكن كيفية استدعاءه لا أذكر و المشكلة اني لا أملك الفيجوال 6 الآن على الجهاز و لم أشتغل به منذ مدة لذا أنا قلت هذا الكلام فقط أنطلاقا مما أذكر :D

;) بسم الله الرحمن الرحيم أختي العزيزة عهود لا تقولي هذا الكلام على نفسك أنتي لست غبية و نحن كلنا كنا هكذا في بداياتنا و أكثر المهم كودي جد جد سهل يحتاج منك التركيز أولا نقوم بتحديد متغير في أعلى الكود و ليس داخل اي أمر في الأعلى هكذا Dim I as Integer ثم نقوم …

بسم الله الرحمن الرحيم أخي APAS بالنسبة لسؤالك الأول فكما قال لك الأخ أحمد يمكنك وضع الكود في واحدة من ال Events التالية لأداة Image مثلا اذا اردت أن تغير الصورة الموجودة في الأداة Image1 عند مرور الماوس فوق الأداة فما عليك سوى كتابة التالي: Private Sub Image1…

بسم الله الرحمن الرحيم في الحقيقة انا منذ مدة لم أضع يدي على الفيجوال بيسك 6 فقط اشتغل بالدوت نت و انا سأعطيك الحل فقط دون تجربته لأني مش متبث الفيجوال 6 المهم الحل بسيط أنت عشان تسهل المأمورية عليك سمي الصور بالطريقة التالية Picture1.jpg Picture2.jpg .. .. ..…

و لا تنسي قسم الألعاب فالأطفال يستهويهم اللعب :D

أختي بنت اليمن مرحبا بكي بين مبرمجي الدوت نت :D بالنسبة لكودك في الحقيقة لم يتسنى لي فتحه و سوف احاول ذلك قريبا أما ملاحظتك فهي في محلها لكن أنا أظن أن ذلك لن يؤثر على الكود و يمكن تلافيه بكود لا يتجاوز السطر و شكرا

بسم الله الرحمن الرحيم أهلا بك أستاذ رغيد و قد سعدنا لطرحك السؤال لكن يبدو أني دخلت متأخرا و رغم ذلك فأنا لم أقرأ أيا من الأجوبة المطروحة قبل محاولتي حل السؤال و هذه أجابتي : Function Repeat(ByVal Word As String, ByVal Count As Integer) As String Dim I As Inte…

الحمد لله

بسم الله الرحمن الرحيم على حسب ما فهمت أختي أنت عندك أداتي PictureBox يعني PictureBox1 PictureBox2 و تريدين مثلا عند تمرير الماوس على PictureBox1 تحمل صورة من أختيارك في ال PictureBox2 ادا كان هدا ما تريدين فما عليك سوى كتابة الآتي Picture2.image=Image.FromFil…

بسم الله الرحمن الرحيم أخي العزيز Undo ما في مشكل المهم طرح السؤال و أجيب عليه و عمت الفائدة و الحمد لله بفضل أستادنا رغيد اما بالنسبة للأخ هارون فنطلب من الله عز و جل أن يرزقه ولدا او بنتا تقر عينه به و أنا لن أستطيع مشاركتكم في الأسئلة المقبلة لأن الدراسة بد…

بسم الله الرحمن الرحيم في الحقيقة انا لم اجربه في الفيجوال دوت نت 2002 لذلك لا أستطيع انأجيبك على هذا السؤال رغم اني اظن ان البرامج المعمولة على النسخ الجديدة لا تشتغل على النسخ القديمة و الله أعلم

بسم الله الرحمن الرحيم في الحقيقة للأسف عند قرائتي لسؤالك لم أكن على جهازي لذا سوف أطرح عليك الحل نظريا فقط و ان شاء الله يشتغل :) أولا قم بعمل متغير في أعلى الكود - داخل الكلاس -- Dim B as Integer = 0 بعد ذلك أكتب كودك في التايمر PictureBox1.Image = Image.Fro…

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