Du musst immer vorsichtig sein, wenn du Berechnungen und Typumwandlungen in einen Befehl bringst. Z.B. hier
Modulstrom2 = Modulstrom * 30 und hier
Modulstrom7uhr = 110 - Modulstrom2

Deine Y-Werte auf dem Display können doch bestimmt nur Byte Werte annehmen, also 0-255. Dann nimm auch keine Integer.

Das hier
If _hour = 7 And _min = 0 and _sec = 0 Then
Modulstrom2 = Modulstrom2 * 5
Modulstrom7uhr = 110 - Modulstrom2
Else
End If

sieht mir so aus, als ob du für jeden 15-Minuten Wert eine Variable hast. Das geht mit Arrays viel einfacher und kompakter. Hast du mit Arrays schon mal gearbeitet?

Gruß

Rolf