[زياد_عاطف]

المشاركة الأصلية كتبت بواسطة محمد حبوش

خالص الشكر والتقدير للاستاذ عاطف ولكن نرجوا تحميل الاجابة النموذجية لامتحانات حضرتك مع الاسئلة ، فنرجوا تحميل اجابة هذا النموذج .وشكرا

===============
اجابة السؤال الاول
1- I Love Egypt
2- مصر أم الدنيا
==========
اجابة السؤال الثانى
1- Logic
2- F5
3- False - 7
4- 6
5- 5
==========
اجابة السؤال الثالث
1- تم إستخدام البيان Atef_Mahdy و لم يتم الإعلان عنه فى نطاق إستخدامه
2- من قواعد تسمية المتغيرات أو الثوابت يمكن إستخدام A كإسم بمفرده أو يليه أى حروف أو أرقام أو الشرطة السفلية و لكن الشرطة السفلية (_) لا يمكن إستخدامها كإسم بمفردها و يجب أن يليها حرف أو رقم على الأقل كحد أدنى
ملاحظة و لا يجب أن يتعدى الإسم 255 حرف كحد أقصى و لا يكون كلمة محجوزة و لا تزيد مفردادها عن الحروف أو الأرقام أو الشرطة السفلية و لا يكون مكرر
3- كتبت بعد Rem أو (') - أى فى مكان كتابة الملاحظات فلا تعامل معاملة الأكواد و لا يتم ترجمتها عند تشغيل البرنامج
==========
اجابة السؤال الرابع
أ-
Dim Name As String
Name=Txt_StudentName.Text
If Name = "Atef_Mahdy" Then
MsgBox("اللهم إغفر لنا و إرحمنا")
Else
MsgBox("لا حول و لا قوة إلا بالله")
End If

ب- 1- اللهم إغفر لنا و إرحمنا
2- لا حول و لا قوة إلا بالله

أطيب الأمنيات بالتوفيق
عاطف مهدى حسان