منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : لمساعدة في التنبية بالمعاملات المتاخرة بناء على عدد الايام المطلوبة لانجاز المعاملة ا
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
شوف هذه المقالة يمكن تفيدك

http://vb4arb.com/vb/showthread.php?tid=...t=DateDiff

وراجع ايضا هذا الموظوع

http://vb4arb.com/vb/showthread.php?tid=19343
ضع هذا الكود في الفورم لود :

كود :
Dim dp As New OleDbDataAdapter("select * from [Documents] where [DocumentDate] < '" & Date.Now.ToString("yyyy/MM/dd") & "'", constring)

       Dim ds As New DataSet

       dp.Fill(ds)

       Label6.Text = ds.Tables(0).Rows.Count