الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

البرنامج لا يظهر النتائج المطلوبة

مغلق
بدأه زهرة الاوركيد في 14 يوليو 2005 · 6 رد · 655 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

فكرة البرنامج

ان يحسب الربح الخاص بالمساهم حيث أدخل تاريخ المدة المحددة فيقوم البرنامج بحساب نسبة ربح المساهم من تاريخ انضمامه الى تاريخ مدة محددة ((انا ادخل هذا التاريخ))

المشكلة :

اذا وضعت تاريخ (المدة المحددة) أحياناً لا تظهر نتيجة الربح للمساهم وتظهر فقط عدد الايام

واحيانا اخرى عند تغير تاريخ المدة المحددة لا يظهر حتى عدد الايام

وهذي اخر نسخة من البرنامج >>في المرفقات

ارجوا المساعدة لمعرفة اين الخطأ ;)

فيجول.zip

#2

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

الكود كالتالي

total = (no1 * no2 ) *( datediff("dd",date1,date2))

علماً بان date1 هو تاريخ الاسهم والثاني هو التاريخ الذي ستحددينه

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

#3

لوسمحت أخ omani ممكن توضح أكثر عن هذه الدالة

#4

السلام عليكم

نيابة عن الأخ عماني

دالة DateDiff تعيد الفرق بين تاريخين

مثلا

Dim r, t As Date
r = "10/5/1425"
t = "20/5/1425"
total = DateDiff("d", r, t)
MsgBox total

تظهر الناتج 10

460.gif

#5

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

ولك مني جزيل الشكر

#6

جرب

فيجول.zip

460.gif

#7

أخ المتميز أنا جربت البرنامج بادخال التاريخ (29-2-1426) للمساهم سعيد وماطبق ممكن أنت تجربة وتشوف أيش الغلط إذا سمحت وما يكلف عليك

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…