Informatika és tudomány

Visual Basic Programozás, segítsetek nekem
  • Szusz123
    #268
    Nagyon szépen köszönöm a segítségeteket! Sokat segítettetek. Sikerül elkészítenem és már csak 1 apró finomság hiányzik.

    Private Sub Command1_Click()
    Label1 = DateDiff("m", "22/08/2008", (Now)) & " Hónap"
    End Sub

    Private Sub Command2_Click()
    Label1 = DateDiff("yyyy", "22/08/2008", (Now)) & " Év"
    End Sub

    Private Sub Command3_Click()
    Label1 = DateDiff("d", "22/08/2008", (Now)) & " Nap"
    End Sub

    Private Sub Form_Load()
    Label1 = DateDiff("d", "22/08/2008", (Now)) & " Nap"
    End Sub

    Rákattintok a Command2-re akkor 1 évet ír..De ez még nincs egy év :S