If Not Date.TryParse(tbostartdate.Text, start_date) Or
      Not Date.TryParse(tboEnddate.Text, end_date) Or
       (end_date - start_date).TotalDays < 2 Then
 
       MsgBox("Ungeeignete Eingabe des Zeitintervalls")
   Else
            'Verarbeitung des Intervalls:
            'start_date und End_date enthalten einen
            'Zeitraum
            'Der muss allerdings innerhalb des Ablesezeitraums
            'der Zählerstände liegen. Das könnte man noch prüfen.            
   End If