การจะเอาวันเดือนปี ลบ วันเดือนปี ว่าห่างกันกี่วัน ต้องทำไงค่ะ VB 2008

Dim date1 As New System.DateTime(1996, 6, 3, 22, 15, 0)
Dim date2 As New System.DateTime(1996, 12, 6, 13, 2, 0)

Dim diff1 As System.TimeSpan
diff1 = date2.Subtract(date1)

' ผลลัพธฺ์ diff1 gets 185 days, 14 hours, and 47 minutes.

        Dim nDate As DateTime = Now  ' วันและเวลาปัจจุบัน
        Dim tDate As New DateTime(2013, 4, 2, 0, 0, 0) ' วันที่ 1 / 5 / 2013 0:00:00

        Dim diffDay As Integer = nDate.Subtract(tDate).Days

        ' สังเกตุ  .Days  คือ property 1 ตัว  ยังมีอีกมากมายที่ให้คุณเลือกใช้
        ' คุณต้องการจะเอาอะไรต้องการอะไร  ก็ใส่ .นั้นลงไป 
        ' ถ้าใช้ Visual studio จะมี  intellisense ให้ใช้อยู่แล้ว
        ' ลองพิมพ์แค่  nDate.Subtract(tDate). ( << มีจุดด้วย )  แล้วมันจะเด้งมาให้เลือกอีกเพียบเลย  
        ' เล่นบ่อยๆ  ค่อยๆชินนะครับ

        ' จากที่คุณดึงเวลามาเป็น Date1 / Date2  ก็หวังว่าจะเอาตัวอย่างนี้ไปใช้ได้นะครับ