مساحة اعلانات نصية ذهبية |
||
كوبونات خصم | اعلن هنا | اعلن هنا |
اعلن هنا | مساحة إعلانيه |
|
|
أدوات الموضوع | انواع عرض الموضوع |
#1
|
|||
|
|||
التعامل مع الرياضيات , انشاء برنامج لايجاد قيمة محدد بواسطة فيجوال بيسك دوت نت VB.Net
بسم الله الرحمن الرحيم
هناك نوعان من المحددات التي سنتعامل معها :- -محدد من درجة ثانية - محدد من درجة ثالثة لفك "ايجاد قيمة" المحددات من الدرجة الثانية تكون كالاتي ad - cb = القيمة عملية فك المحدد من الدرجة الثانية سهل في فيجوال بيسك فقط قم بتعريف المتغيرات أضف 4 Textbox وسم المتغيرات كالاتي اقتباس: Dim a, b, c, d As Integer a = TextBox1.Text b = TextBox2.Text c = TextBox3.Text d = TextBox4.Text وهذا شكل الفورم في زر ايجاد القيمة سنضع الحل في مسج بوكس اقتباس: MsgBox((a * d) - (c * b)) لكن في حال أردنا ايجاد قيمة محدد من درجة ثالثة المكونة من 3 اعمدة وصفوف , ماذا نفعل؟ طريقة الحل هي سارس , حيث يتم نقل العمود الاول والثاني بعد العمود الثالث ويتم ضرب الاقطاء الرئيسية وجمعها , ثم طرح الناتج مع حاصل ضرب الأقطار الثانوية وجمعها. يعني نحتاج الى 9 Textbox اقتباس: Dim S1 As Integer Dim S2 As Integer Dim S3 As Integer Dim SumOfS As Integer S1 = (Nm1.Text * Nm5.Text * Nm9.Text) S2 = (Nm2.Text * Nm6.Text * Nm7.Text) S3 = (Nm3.Text * Nm4.Text * Nm8.Text) SumOfS = S1 + S2 + S3 '--------------------------------------- Dim X1 As Integer Dim X2 As Integer Dim X3 As Integer Dim SumOfX As Integer X1 = (Nm2.Text * Nm4.Text * Nm9.Text) X2 = (Nm1.Text * Nm6.Text * Nm8.Text) X3 = (Nm3.Text * Nm5.Text * Nm7.Text) SumOfX = X1 + X2 + X3 Dim Ans As Integer Ans = SumOfS - SumOfX MsgBox(Ans) الحل مقسم الى جزئين , جزء خاص بالأقطار الرئيسية وجزء اخر بالاقطار الثانوية , ثم يقوم البرنامج بالطرح وايجاد قيمة المحدد. |
|
|
المواضيع المتشابهه | ||||
الموضوع | كاتب الموضوع | المنتدى | مشاركات | آخر مشاركة |
مشكلة في برنامج فيجوال بيسك 6 | اشراق العالمrss | اشراق شامل - منوعات | 0 | 01-30-2013 01:10 PM |
طلب برنامج فيجوال بيسك 6 ؟؟!! | eshrag.net | المنتدى العام - مواضيع عامة | 0 | 08-08-2010 05:00 PM |
مشكلة فيجوال بيسك | eshrag.net | المنتدى العام - مواضيع عامة | 0 | 08-02-2010 07:01 PM |
ما الفرق بين فيجوال بيسك و فيجوال بيسك دوت نت وما أفضل إصدار من جميع النواحي.. أدخل | eshrag.net | المنتدى العام - مواضيع عامة | 0 | 07-28-2010 11:41 AM |
فيجوال بيسك 6 | eshrag.net | المنتدى العام - مواضيع عامة | 0 | 07-06-2010 03:10 PM |
شراء روابط نصية | |
راسلنا الآن لشراء روابط نصية باك لينك وجيست بوست | خدمات الباك لينك والروابط النصية |
روابط نصية AAXA | ||||
اشتراك يوتيوب بريميوم | اشتراك تطبيقات بلس | اشتراك IPTV شهر | يوتيوب بريميوم | عسل النحل |
روابط نصية AAPS | ||||
دراما كافيه | دراما صح | اهواك Tv | فوستا | شبكتي Tv |
روابط نصية AA1A | |||||
كورة لايف | koora live | مباريات اليوم بث مباشر | kora 360 | koora4live | كورة لايف |
koora live | مباريات اليوم بث مباشر | kora 360 | koora4live | kooralive | مساحة إعلانيه |
روابط نصية AAZ | ||
متجر الرياض | شدات ببجي | شحن شدات ببجي |
روابط نصية AHD3 | |||||||||
عزل اسطح | كشف تسربات المياه | عزل فوم بالرياض | شركة عزل اسطح | كشف تسربات المياه بالرياض | عزل اسطح بجدة | شركة كشف تسربات المياه | نقل اثاث بالرياض | شراء اثاث مستعمل بالرياض | شركة تنظيف بالرياض |
روابط نصية KSM | |||||||
خصومات | هدايا وكوبونات | توفير المال | مال واستثمار | صفقات وتسوق | عروض اسواق السعودية | تحسين مالي | كوبونات |
روابط نصية AN | ||||
يلا شوت | يلا شوت | يلا لايف | yalla shoot | يلا شوت |
روابط نصية M11 | |||||||
كورة جول | يلا لايف | دوت سبورت | bein match | yalla shoot | yalla shoot | koora live | koora live |
يلا شوت | koora4live | سوريا لايف | تابع لايف | كورة لايف | كورة جول | كورة لايف | koora live |
روابط نصية AWA | ||||
كورة لايف | Koora live | يلا شوت | Yalla shoot | يلا شوت |
روابط نصية AA3A | ||||
تقييم شركة exness | تقييم شركة binance | تقييم شركة avatrade | تقييم شركة evest | افضل شركات التداول |
روابط نصية S22 | ||||
تشليح السيارات بالرياض | شراء سيارات تشليح بالرياض | تشليح | تشليح الحاير | تشليح السلى |
موقع شراء سيارات تشليح | شراء سيارات تشليح | تشليح السيارات | قطع غيار تشليح | تشاليح |