درس جديد: صنع آلة حاسبة بالفجوال بيسك6

[مدحت مرعبي]

إخواني واحبائي أعضاء المهندسين العرب أقدم لكم درس كيفية عمل آلة حاسبة كمشروع بسيط

وبدائي على طريق تعلم لغات البرمجة واستعمالها وسنبدأ بالقسم الأول:

يتبع القسم الثاني فيما بعد...

في هذا القسم من الدرس نقوم بإعداد مربعات العمل أو النوافذ كما في الصور التالية









































والآن نأتي إلى القسم الثالث وهو كود المشروع ليصبح برنامجا تنفيذيا

Dim A,B
A=Val(****1.****)
B=Val(****2.****)
If Option1.Value=True Then
****3.****=A + B
End if
If Option2.Value=True Then
****3.****=A - B
End if
If Option3.Value=True Then
****3.****=A * B
End if
If Option4.Value=True Then
****3.****=A / B
End if