VB.NETでDatediff（）関数が期待した結果を得ない

Question

私のプロジェクトでは次のコードを使用しています。私は最後の日付と今与えられた日数を探したい。

Dim BorrowDate As Date 
Dim i As Integer 
BorrowDate = Date.Parse(txtBorrowDate.Text) 
i = DateDiff(DateInterval.Day, BorrowDate, DateTime.Now) 

たとえば、BorrowDateが "01/Jul/2011"の場合、結果は7日で10になります。変数の初期化と日付を表示する：あなたはこの

Dim BorrowDate As Date = Date.Parse(txtBorrowDate.Text) 

    Debug.WriteLine(BorrowDate.ToString) 
    Debug.WriteLine(DateTime.Now.ToString) 

    Dim ts As TimeSpan = DateTime.Now - BorrowDate 

    Dim numdays As Integer = CInt(ts.TotalDays) 

    Debug.WriteLine(numdays.ToString("n0")) 

編集を試みる場合があります。ネット使用しているので

Answer 1

を助けてください。