كم كردن 2 تاريخ شمسي موجود در Textbox از يكديگر

[M.KH-SH]

دوست عزیز::::

Dim d1, d2 As Date

        d1 = "1390/01/02"

        d2 = "1390/01/29"

        Label1.Text = DateDiff(DateInterval.Day, d1, d2)

شما به هر صورتی که دلت میخواد وارد کن