autoopdater felt i program

private sub txtKreditindkørt_Change()
txtKontantindkørt = Val(txtBeløbindkørt) - Val(txtDankortindkørt) - Val(txtAndrekortindkørt) - Val(txtKontoindkørt) - Val(txtKreditindkørt)
End Sub

?

når du ændrer txtKreditindkørt regner den det automatisk ud... !

kunne du bruge det ?

ej her er løsningen !

du indsætter en timer og sætter intervallet til fx 1000 og så indsætter du denne kode:

Private Sub Timer1_Timer()
txtKontantindkørt = Val(txtBeløbindkørt) - Val(txtDankortindkørt) - Val(txtAndrekortindkørt) - Val(txtKontoindkørt) - Val(txtKreditindkørt)
End Sub

nu opdaterer den resultatet hvert sekund !

du kan også sætte intervallet til 5 så den opdaterer med det samme !

den er da god nok med ..._Change()


Private Sub txtBeløbindkørt_Change()
  Call updata
End Sub

Private Sub txtDankortindkørt_Change()
  Call updata
End Sub

Private Sub txtAndrekortindkørt_Change()
  Call updata
End Sub

Private Sub txtKontoindkørt_Change()
  Call updata
End Sub

Private Sub txtKreditindkørt_Change()
  Call updata
End Sub

Private Sub updata()
  txtKontantindkørt = Val(txtBeløbindkørt) - Val(txtDankortindkørt) - Val(txtAndrekortindkørt) - Val(txtKontoindkørt) - Val(txtKreditindkørt)
End Sub

ja det er rigtig nok!
men med timer er der noget mindre kode at skrive ;)

Jo.. men man kan jo lave det som control-array

Private Sub xkørt_Change(Index As Integer)
  txtKontantindkørt = Val(xkørt(0)) - _
                      Val(xkørt(1)) - _
                      Val(xkørt(2)) - _
                      Val(xkørt(3)) - _
                      Val(xkørt(4))
End Sub

hej jeg har prøvet dette

Private Sub Timer1_Timer()
txtKontantindkørt = Val(txtBeløbindkørt) - Val(txtDankortindkørt) - Val(txtAndrekortindkørt) - Val(txtKontoindkørt) - Val(txtKreditindkørt)
End Sub

men jeg kan ikke få det til at virke

du skal sætte en timer ind på din form!

(det er det lille "stopur")

og den skal hedde Timer1

oki hvor skal den sidde og hvordan ser den ud

du skal bare placere den tilfældigt på formen !

ja men jeg ved ikke hvad jeg skal skrive for at lave et stopur

ha ha den ser sådan ud: http://www.voxcommunications.com/sky/vbtoolbar_clock.jpg

www.faarup.1go.dk/exp

undskyld ja det vidste jeg godt tænkte mig ikke lige om

ja det er den :)

virker det nu ?

jubii nu virker det

så tror jeg at jeg lægger et svar ;)

takker for hjælpen

det havde jeg gjort ;) tak for points og fortsat god VB lyst

jo tak