Visual Basic Programozás, segítsetek nekem
  • gabor789
    #267
    Csinálj a formon mondjuk 3 db. text_ablakot és 1 db. parancs_gombot...
    a parancsgomb clickjéhez ird be:

    Private Sub Command1_Click()

    DATUM_1 = text1.Text ' ide kerül majd a kisebbik dátum
    DATUM_2 = Text2.Text ' ide kerül majd a nagyobbik dátum

    For x = 1 To 1000000 ' a két időpont közötti maximális idő napban
    If Str(DateAdd("d", x, DATUM_1)) = DATUM_2 Then Text3.Text = x: Exit Sub
    Next x

    End sub

    Ha elindítod és az ablakokba beirsz egy-egy dátumot a harmadikba kiirja a két dátum közötti napot...
    Persze átvariálhatod, a text3 lehet label, a command valaminek a része stb...