access form tijdwaarde ophogen met 10minuten

[Peer44]

Hallo,

ik loop tegen het volgende probleem aan:
Ik heb een veld "tijdstipcontrole1", dit heeft als eigenschap de korte tijdsnotatie.

nu wil ik op een button drukken, en de waarde ophogen met 10 minuten, onderstaande code werkt goed voor getallen maar niet voor format Tijd.

Private Sub tijd10p_Click()
Me.TijdstipControle1 = Me.TijdstipControle1 + 10
End Sub

Hoe kan ik hier een berekening van maken zodat de tijdfunctie werkt?

dit had ik geprobeerd maar werkt niet:

Private Sub tijd10p_Click()
Me.TijdstipControle1 = Me.TijdstipControle1.format(tijdstipcontrole1, "hh:mm") + 600
End Sub

 

[OctaFish]

In het eerste voorbeeldje voeg je 10 dagen toe, en in het tweede 600. Dat zal de bedoeling niet zijn geweest... Datums zijn in beginsel integere getallen, en tijden een breuk daarvan. Een tijd is dus altijd >0 en <1. Om lastig rekenen te voorkomen (het getal 0,5 = 12 uur, maar 0,21934?) kun je de functie TimeSerial gebruiken.

     Me.TijdstipControle1 = Me.TijdstipControle1 + TimeSerial(0,10,0)

 

[Peer44]

Dank u, dit zocht ik!