Akram Galal قام بنشر سبتمبر 16, 2015 مشاركة قام بنشر سبتمبر 16, 2015 السلام عليكم ورحة الله وبركاتةتحية طيبة لكل أعضاء المنتدىاريد كود يقوم بعمل الأتي:عند الضغط علي الزر لأول مرة يقوم بجمع تكست 1 + تكست 2 وعند الضغط علي الزر بعد أول مرة يقوم بضرب تكست 1 × تكست 2جزاكم الله خيراً . مهمتين.rar رابط هذا التعليق شارك More sharing options...
عبد العزيز البسكري قام بنشر سبتمبر 16, 2015 مشاركة قام بنشر سبتمبر 16, 2015 السلام عليكم و رحمة الله و بركاته جرّب أخي الغالي أكرم جلال هذا المرفق ربما يكون ما طلبته .. خالص احتراماتي مهمتين 2.rar 3 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر سبتمبر 16, 2015 مشاركة قام بنشر سبتمبر 16, 2015 اخي الحبيب عبد العزيز ممكن إضافة بسيطة لكي لا يتوقف الماوس Private Sub CommandButton1_Click() If TextBox4 = "" Or TextBox4 = Val(TextBox2) * Val(TextBox3) Then TextBox4 = Val(TextBox2) + Val(TextBox3) Else TextBox4 = Val(TextBox2) * Val(TextBox3) End If End Sub يعني افضل اعمل كليك مرة يجمع ومرة يضرب .. 3 رابط هذا التعليق شارك More sharing options...
عبد العزيز البسكري قام بنشر سبتمبر 16, 2015 مشاركة قام بنشر سبتمبر 16, 2015 السلام عليكم و رحمة الله و بركاته بارك الله فيك أستاذنا الغالي ياسر خليل أبو البراء على الاضافة المميّزة .. وهي الأفضل .. جزاك الله خيرًا و زادها بميزان حسناتك خالص احتراماتي رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر سبتمبر 16, 2015 مشاركة قام بنشر سبتمبر 16, 2015 جزيت خيراً أخي الحبيب عبد العزيز الفضل لله ثم لك في الإبداع الأول ..ما أضفت إلا القليل جداً البركة فيك يا أبو فتح 1 رابط هذا التعليق شارك More sharing options...
Akram Galal قام بنشر سبتمبر 17, 2015 الكاتب مشاركة قام بنشر سبتمبر 17, 2015 أ/ عبد العزيز أ/ ياسر خليل جزاكم الله كل الخير فكرة ممتازة رابط هذا التعليق شارك More sharing options...
مختار حسين محمود قام بنشر سبتمبر 17, 2015 مشاركة قام بنشر سبتمبر 17, 2015 وهذه اضافة أيضا قد تفيد بأن اسم الزر فى اليوز فورم يتغير مع تغير العملية الحسابية Private Sub CommandButton1_Click() If Me.CommandButton1.Caption = "جمع " Then Me.CommandButton1.Caption = "ضرب " Me.CommandButton1.BackColor = RGB(0, 255, 0) TextBox4 = Val(TextBox2) + Val(TextBox3) Else Me.CommandButton1.Caption = "جمع " Me.CommandButton1.BackColor = RGB(255, 0, 0) TextBox4 = Val(TextBox2) * Val(TextBox3) End If End Sub مهمتين لزر واحد .rar 2 رابط هذا التعليق شارك More sharing options...
عبد العزيز البسكري قام بنشر سبتمبر 17, 2015 مشاركة قام بنشر سبتمبر 17, 2015 السلام عليكم و رحمة الله و بركاته أهلا و سهلا بالأستاذ الغالي .. الأفضل من كل هذه الأكواد وهذا الملف المميّز هي .. عودتك الميمونة .. بإذن الله تعالى الحمد لله و أخيرًا ظهر الأخ و الأستاذ العزيز و الله على قلوبنا " مختار حسين محمود " بعد غياب أراه طويلاً خالص احتراماتي 1 رابط هذا التعليق شارك More sharing options...
مختار حسين محمود قام بنشر سبتمبر 17, 2015 مشاركة قام بنشر سبتمبر 17, 2015 أشكرك أخى العزيز الى قلبى زيزو البسكرى أشكرك على كلامك الطيب بحقى ان طال الغياب فالشوق غلاب الى منتدى الاحباب نعمل ايه فى الدنيا ومشاغلها !!!! 1 رابط هذا التعليق شارك More sharing options...
أبو أنس80 قام بنشر فبراير 9, 2016 مشاركة قام بنشر فبراير 9, 2016 مشا الله لمنتدى حلو والله انا اعجبت كثير باعمالكم رائعة و مدهشة بارك الله فيكم جميعم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان