Miten voisi tehdä visualilla laskurin, joka näyttäisi tietsikan ruudulle päivittäin, montako päivää on valmistumiseen? Eli, kun avaan koneeni, niin taas olisi yksi päivä vähemmän koulua.
TJ-laskuri
Kiva juttu
11014
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 1
Vanhimmat
Private Sub Form_Load()
Dim valmistuminen As Date
Dim paivia_jaljella As Integer
' seuraavaksi asetetaan valmistumispäivä
valmistuminen = "6.12.2002"
' lasketaan, montako päivää jäljellä
paivia_jaljella = valmistuminen - Date
' laitetaan formin otsikoksi
Caption = CStr(paivia_jaljella)
' asetetaan ohjelma näkymään vain tilarivillä
Form1.WindowState = 1
End Sub
Ja koko ohjelma sitten käynnistymään aina konetta avattaessa