تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب سورس كود حسبه
#1
[COLOR="#FF0000"]السلام عليكم ورحمه الله وبركاته

اخبارك اخواني ان شاء الله بخير

انا جديد في المنتدى واتمنى ماتردوني خايب

اريد سوس كود بس ركزو معي

انا بفتح تكست 3 اثنين منهم ضع الاعداد وواحد الناتج

ابي مثلا اضع بالتكست الاول رقم 50 والتكس الثاني 90 ولما اضغط زر الناتج يقسم العدد الى بالتكست الاول على 100 والناتج يضربه بنفسه وبعدها يقسمه على العدد الى بالتكست الثاني وطلعلي الناتج في التكست الثالث تلقائي

يعني ماابي بالمشروع زر + ولا قسمه

ابي العمليه تتم بضغطه زر واحده تكفون محتاجها ضروري

اخوكم فيصل
[/COLOR]
الرد }}}
تم الشكر بواسطة:
#2
عليكم السلام ورحمة الله وبركاته
اخي العزيز ضع هذا الكود

كود :
Dim num As Integer
        num = Val(Text1.Text)
Text3.Text = num / 100 * num / 100 / Val(Text2.Text)
ان شاء الله يعمل واذا صار خطأ اعتذر لان عملت الكود على vb.net وحولته الى 6
بالتوفيق
الرد }}}
تم الشكر بواسطة:
#3
الله يعطيك العافيه ماقصرت بس في خطأ مو بالكود بالحسبه

ابي اول شي يعمله الكود يقسم العدد الى بالتكست 1 على 100 وبعدها يضرب العدد بنفسه وبعدها يقسم الى بالتكست2 على الناتج من التيسك 1 ويطلع الناتج

انا بعطيك طول مع الوزن اول شي الطول هو التيكست 1 والوزن هو التيكست 2

طولي :179
وزني :104

الناتج يكون 34 وانا متأكد من الناتج وياليت يااخوي لو تساعدني راح ادعيلك وانا ساجد والله شاهد على
الرد }}}
تم الشكر بواسطة:
#4
اتمنى ان يفيدك

لكن الاخ 3boood قد افادك بكود يفيدك وصغير
لكن حبيت ان اساعدك

http://vb4arb.com/vb/uploaded/76_01367264457.rar
الرد }}}
تم الشكر بواسطة:
#5
تدلل اخي الغالي

كود :
Dim num As Integer
        num = Val(Text1.Text) / 100 * Val(Text1.Text) / 100
        Text3.Text = Val(Text2.Text) / num
الرد }}}
تم الشكر بواسطة:
#6
طلع الناتج الله يعطيك الف الف الف عافيه الله يوفقك دنيا واخره ويرحم والديك ويسكنك الجنه
الرد }}}
تم الشكر بواسطة:
#7
الله يعافيك ويوفق الجميع يارب
الرد }}}
تم الشكر بواسطة:
#8
هذا مرفق بسيط
يعلمك أو
[SIZE=3][b]يساعدك فى عملية التقريب التى كنت تسأل عنها
بشئ من التفصيل[/b][/SIZE]


الملفات المرفقة
.zip   التقريب.zip (الحجم : 1.55 ك ب / التحميلات : 39)
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم