ايران ويج

نسخه‌ی کامل: اختلاف بين 2 تاريخ
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
من تو برنامه ام دوتا تکست باکس دارم که هرکدومشون تاریخ دریافت میكنن حالا من میخوام بدونم بین تاریخ اول و دوم چند روز وجود دارد(دوستان لطفا يكى كدشو برام بنويسه)
سلام دوست عزیز .
برای به دست آوردن اختلاف بین دو تاریخ باید از تابع DateDiff استفاده کنید :

کد:
Dim TheDate As Date   ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date")
Msg = "Days from today: " & DateDiff("d", Now, TheDate)
MsgBox Msg

موفق باشید .