طلب شرح برنامج الزكاة
 

مشاركة: طلب شرح ساااااااااااااااااعدوني
 

ياعالم ردووو تكفففووووون

مشاركة: طلب شرح برنامج الزكاة
 

ممكن احد يتوجه لرئيس القسم او المنتدي او من لديه اخبر يساعدني
طالللللللللللللللللللللبتك لاتردوني قبل اليوم الموعود

مشاركة: طلب شرح برنامج الزكاة
 

مرحبا ..
لما نرغب تصميم برنامج في فجول بيسك
لابد ان نمر بـ مراحل
أولا ... تحديد عناصر المسألة
المدخلات .. مايتم ادخالة للبرنامج
عملية المعالجة ...مايتم من عمليات على المدخلات
المخرجات .. ناتج البرنامج من العملية

في برنامج الزكاة
المخلات .. المبلغ المرغوب تزكيته ونرمز له m
العمليه .. المبلغ ×0.025
يعني m ×0.025=Z
المخرجات .. قيمة الزكاة z

ثانيا .. كتابة الخطوات الخوارزمية
1 ادخل مبلغ الزكاة M
2 احسب m ×0.025=Z
3 اطبع Z
4 نهاية

ثالثا .. المخطط الإنسيابي

رابعا ..كتابة البرنامج وتمر بثلاث مراحل
1 تصميم الواجهه
2 ضبط الخصائص
3 كتابة التعليمات

وسنأخذ كل مرحلة بشيء من التفصيل
1 تصميم الواجهه
http://www.hayah.cc/forum/imgcache/19554.png


2 ضبط الخصائص
التحكم بخصائص ادوات النافذة وخصوصا
خاصية Caption


3 كتابة التعليمات
وهو كود البرنامج لاجراء عملية المعالجة واظهار المخرجات

Private Sub Command1_Click ( )
بداية الاجراء .. اذا نُقر على الاداة الامر نفذ التالي
Dim m As Single,z As Single
تعريف المتغيرين M ,Z
m = Text1.Text
تخزين قيمة المبلغ المدخل في مربع النص Text1 في المتغير M
z = 0.025 * m
اجراء العملية الحسابية على المبلغ وتخزين النتيجة في المتغيير Z
If m > 400 Then
z & " الزكاة= " = Text2.Text
اذا كانت قيمة Z اكبر من 400 فاجعل مربع النص Text2 يأخذ قيمة Z
Else
وإن لم تكن
"البرنامج يقوم بحساب الزكاة لأكثر من 400 ريال " = Text2.Text
فاجعل مربع النص Text2 يأخذ قيمة "البرنامج يقوم بحساب الزكاة لأكثر من 400 ريال"
End If
نهاية جملة If

End Sub
نهاية الإجراء

مشاركة: طلب شرح برنامج الزكاة
 

مشاركة: طلب شرح برنامج الزكاة
 

طيب اختي المميزة المدرسه طالبين مني ان احضر تحضير
للدرس وانا لاعرف طريقه ولا اعرف الاهداف ماذا اكتب فيها
ممكن تزويديني بها

مشاركة: طلب شرح برنامج الزكاة
 

مادري ايش حدود درسك
فاخوذي من هنا مايناسبك

http://www.7asabco.com/showthread.php?t=9660&page=2