Come poter sapere quanti giorni mancano ad una certa data

Su una WindowsForm posizioniamo un componente di tipo DateTimePiker, una Label ed un Button.
vedi figura:


Nell'evento click del button andiamo a scrivere il segeuente codice:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim datafinale As DateTime = New DateTime
datafinale = Me.DateTimePicker1.Value
Dim differenza As TimeSpan = datafinale.Subtract(DateTime.Now)
Dim giorni As Integer = differenza.Days
Dim ore As Integer = differenza.Hours
Dim minuti As Integer = differenza.Minutes
Me.Label1.Text = giorni.ToString() & ":" & ore.ToString() & ":" & minuti.ToString()
End Sub
End Class