اضافة كود الى تطبيق القسمة من خلال الفيجوال بيسك

- لاضافة كود الى التطبيق لابد من تحديد مهمة التطبيق (نحدد ال flowchart) :

قسمة العدد الذي يتم ادخاله في المربع الأول على العدد الذي يتم ادخاله في المربع الثاني واظهار النتيجة في المربع result

- لعمل هادي المهمة نضغط ضغطا مزدوجا على الزر الموجود للقسمة ، ستظهر شاشة اخرى للكود
عند الكود الخاص بالزر نكتب التالي:

  

Dim first As Double

Dim second As Double

Dim calculate As Double

first = FirstNo.Text

second=SecondNo.Text

calculate= first / second

result.Text=calculate