[رزق درديري]

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

dim a as single
x=me.textbox1.text
if x=0 then
me.textbox1.text=""
elseif x>0 then
msgbox("موجب")
else
msgbox("سالب")
end if

هنا يوجد تعبيرين شرطيين في الكود وهذا من وجهة نظري لا يناسب رموز الخريطة الواردة في الامتحان كان من الأفضل ان السؤال يكون بدون خريطة أو يضيف جزء عند ادخال صفر ...