طلب حسآب مساحة مستطيل بإستخدام الإخراج

[d7ome]

السلام عليكم ورحمة الله وبركاته

اسعد الله اوقاتكم بكل خيير ..

أعزائي

ممكن مسآعده بسيطه بسس

قم بحسآب مساحة مستطيل بإستخدام الإخراج ؟

هذا السؤآل شوي لخبطني .. ماعرفت رآسي من كريآسي

عرفت اسوي الإدخآل بسس الإخراج مدري تهت فييه شوي

ممكن مساعده منكم الله لا يهينكم

والله رح تسآعدوني كثيييير

[magnm_4]

حتى انا نفس الشي وبعد يومين عندي اختبآر عملي آبغى حل لهالموضوع ورد سريع آذآ تكرمتوآ .

[طالب المزيد]

أول شي أبغى اشوف حلولكم ومحاولاتكم بعدين أقولكم علي الحل الصحيح

اتفقنا !!

[magnm_4]

لو سمحت ممكن تقولي الاجابه لان عندي اختبآر ومره خآيف .. لو تكرمت

[d7ome]

عفواً ع التأخير ..

اللي سويته

Dim a , b , c as single
lable1.caption=c
text1.text=c
msgbox(c)

[طالب المزيد]

عفواً ع التأخير ..

اللي سويته

Dim a , b , c as single
lable1.caption=c
text1.text=c
msgbox(c)

يعني قربت من الحل الصحيح

حمل من المرفقات الحل الصحيح


Dim a, b, c As Single
a = Text1.Text
b = Text2.Text
c = a * b
MsgBox "مساحة المستطيل = " & c

[حمدلله]

مشكور.............................