[مصطفى مصطفى]

وعليكم السلام

Dim str1 As String =  DateTimePicker1.Text

Dim str2 As String = DateTimePicker2.Text

Dim D1 As DateTime = DateTime.Parse(str1).Date

 Dim D2 As DateTime = DateTime.Parse(str2).Date

Dim Days As Single = (D2 - D1).TotalDays