من تو برنامه ام دوتا تکست باکس دارم که هرکدومشون تاریخ دریافت میكنن حالا من میخوام بدونم بین تاریخ اول و دوم چند روز وجود دارد(دوستان لطفا يكى كدشو برام بنويسه)
سلام دوست عزیز .
برای به دست آوردن اختلاف بین دو تاریخ باید از تابع DateDiff استفاده کنید :
کد:
Dim TheDate As Date ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date")
Msg = "Days from today: " & DateDiff("d", Now, TheDate)
MsgBox Msg
موفق باشید .