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

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

ايداع الايرادات الحكومية1 Update1.rar

superhot3000 كتب:

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

ياشيخ روح ربي يوفقك دنيا و آخره ويفتح عليك هذا ما اريده

والله اني اعجز عن شكرك لكن ليس لي الا دعوة لك في ظهر الغيب

أسأل الله ان يتقبل عملك و يغفر لك :)

كل شيئ واضح اشكرك :blush:

example2.zip

استخدم في جمع الحسميات أسماء أخرى للمتغيرات مثلاً

R2 , H2 , C2

بحيث يكون كود الحسميات هكذا:

R2 = [حسم] + [حسم1] + [حسم2] + [حسم3] + [حسم4] + [حسم5] + [حسم6]
H2 = ([هـ6] + [هـ1] + [هـ2] + [هتـ3] + [هـ4] + [هـ5] + [هـ]) / 100
C2 = R2 + H2
R2 = Int(C2)
H2 = (C2 - R2) * 100

[مجموع الحسميات] = R2
[حسميات_هلل] = H2

ومن أجل عملية الطرح , استخد متغيراً ثالثاً وليكن C3 بحيث يكون الناتج بعد الخصم كما يلي:

C3 = C1 - C2

ولكي تقوم بعملية فرز الريالات والهلل بعد الخصم ستكون المعادلة كما يلي:

C3 = C1 - C2
R3 = Int(C3)
H3 = (C3 - R3) * 100

غرّام العقول كتب:

استخدم في جمع الحسميات أسماء أخرى للمتغيرات مثلاً

R2 , H2 , C2

بحيث يكون كود الحسميات هكذا:

R2 = [حسم] + [حسم1] + [حسم2] + [حسم3] + [حسم4] + [حسم5] + [حسم6]
H2 = ([هـ6] + [هـ1] + [هـ2] + [هتـ3] + [هـ4] + [هـ5] + [هـ]) / 100
C2 = R2 + H2
R2 = Int(C2)
H2 = (C2 - R2) * 100

[مجموع الحسميات] = R2
[حسميات_هلل] = H2

ومن أجل عملية الطرح , استخد متغيراً ثالثاً وليكن C3 بحيث يكون الناتج بعد الخصم كما يلي:

C3 = C1 - C2

ولكي تقوم بعملية فرز الريالات والهلل بعد الخصم ستكون المعادلة كما يلي:

C3 = C1 - C2
R3 = Int(C3)
H3 = (C3 - R3) * 100

اشكرك اخي غرام ووفقك الله الى كل خير جاري التجربة :) هل من الممكن لو تكرمت التطبيق على الملف المرفق في ردي السابق

هذا المثال بعد التعديل

بدلاً من تكرار الكود لعشرات المرات , قمت بعمل إجراء يتم استدعاءه بعد تحديث مربعات النص

ايداع الايرادات الحكومية_غرام .rar

غرّام العقول كتب:

هذا المثال بعد التعديل

بدلاً من تكرار الكود لعشرات المرات , قمت بعمل إجراء يتم استدعاءه بعد تحديث مربعات النص

أخي غرام وفقك الله الى كل خير ورحم الله والديك وانار الله بصيرتك تمام بارك الله فيك :lol:

آسف انشغلت ودخلت الان ووجدت ماشاء الله الاخ غرام قام بالواجب ، آسف نجوم اعذرني و غرام على المتابعة.

superhot3000 كتب:

آسف انشغلت ودخلت الان ووجدت ماشاء الله الاخ غرام قام بالواجب ، آسف نجوم اعذرني و غرام على المتابعة.

بارك الله فيك و فيه اخوان الكرام ساراسلكم بشان البرنامج الذي اعمل عليه :blush: