om jag har en klock tid i txt1 och en annan klocktid i txt2 hur får jag skillnaden
exempel i txt1 står det 07:00:00 och i txt2 står det 06:23:00 hur får jag skillnaden till txt3.

Kolla ett av mina uppskick Programarkivet:Två StopUr växelvis

SvenPon jag hänger inte riktigt med på hur det skulle hjälpa mej?

Sub klock()
Dim txt1, txt2, txt3

txt1 = "07:00:00"
txt2 = "06:23:00"

txt3 = DateDiff("n", txt1, txt2) ' Ger skillnaden -37 minuter
txt3 = DateDiff("n", txt2, txt1) ' Ger skillnaden +37 minuter

txt3 = DateDiff("s", txt1, txt2) ' Ger skillnaden -2220 sekunder
txt3 = DateDiff("s", txt2, txt1) ' Ger skillnaden 2220 sekunder

txt3 = DateDiff("h", txt1, txt2) ' Ger skillnaden 0 timmar

End Sub

OBS! Skrivet i Access 97 basic - men det borde fungera även i VB

/Micke

Hjälper det här dig ?

<code>

Private Sub Command1_Click()

hours = Int(Hour(Txt1) - Hour(Txt2))
minutes = Int(Minute(Txt1) - Minute(Txt2))
seconds = Int(Second(Txt1) - Second(Txt2))

Txt3 = TimeSerial(hours, minutes, seconds)

End Sub

</code>

"Margaritas ante porcas"

Jepp det hjälpte mej precis som jag ville ha det Tack Janne

Man skall deklarerar sina variabler!

Varför dela upp tiden? Man kan ju jura subtraktion och addition av tal direkt.
<code>
Private Sub Command2_Click()
txt3 = CDate(CDate(txt2) - CDate(txt1))
End Sub
</code>
Skalla man vara ordentlig:
<code>
Private Sub Command2_Click()
Dim Value1 As Date
Dim Value2 As Date
Dim Result As Date
Value1 = CDate(txt1)
Value2 = CDate(txt2)
Result = Value2 - Value1

txt3 = Result
End Sub
</code>

Andreas dina exempel var faktiskt ännu enklare Tack