... ja das sieht gut aus!

Probier es damit. Das einzige, was ich anders machen würde ist das Warten für 1s. Ich würde die Do-Loop-Schleife mit der RTC steuern:
Am Anfang RTC lesen, _second mit der letzten ausgelesenen Sekunde vergleichen. Wenn immer noch dieselbe Sekunde, dann erneut die RTC lesen (mit einer Mini-Verzögerung, z.B. Waitms 100). Ist die nächste Sekunde angebrochen, läuft die Schleife weiter mit deiner ganzen Heizungssteuerung und zeigt auch die LCD-Ausgabe.
Also etwa so:
Oldsecond = _second
Do ' Hauptschleife
While _second = Oldsecond
' Hole Zeit (oder NUR _second) aus der RTC
Waitms 100
Wend
Oldsecond = _second
' Lese die komplette RTC aus, falls noch nicht oben passiert
' Hier die ganze weitere Heizungssteuerung
Loop
End

Gruß Dirk