Gå til innhold

nedtelling med event etter fullført nedtelling...


Anbefalte innlegg

Videoannonse
Annonse

Nei.. glem det.. jeg har finni det ut selv.. Koden blei, hvis noen er interessert:

pizza = Val(txtinput.Text) * 60

Timbigone.Enabled = True

Private Sub Timbigone_Timer()

pizza = pizza - 1

lblRemaning.Caption = pizza

If pizza = 0 Then

frmbigoneF.Visible = True

Timbigone.Enabled = False

lblStarttime.Caption = ""

Else

End If

End Sub

 

Så det så! =)

Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
  • Hvem er aktive   0 medlemmer

    • Ingen innloggede medlemmer aktive
×
×
  • Opprett ny...