لا استطيع حساب الفرق بين تاريخيين

 Dim sdate = My.Computer.Clock.LocalTime.ToString("dd/MM/yy")
        Dim datTim1 As Date = TextBox2.Text 
        Dim datTim2 As Date = TextBox3.Text 
        
        Dim wY As Long = DateDiff(DateInterval.Day, datTim1, datTim2)
        TextBox1.Text = wY

وضعت هذا الكود

عندما انفذ الكود  يطلع  هذا الخطأ   لا ادري مالحل

valid values between 1 and 9666, inclusive.parameter name:year

ولكن اذا وضعت قيم  ثابته  يشتغل تمام

مثل

Dim sdate = My.Computer.Clock.LocalTime.ToString("dd/MM/yy")
        Dim datTim1 As Date = #7/5/1435#
        Dim datTim2 As Date = #7/10/1435#
       
        Dim wY As Long = DateDiff(DateInterval.Day, datTim1, datTim2)
        TextBox1.Text = wY

ارجووووووووووووو المساعده