Dziś chcę pokazać, jak do wykonywania obliczeń między datami wygodne w Visual Basic. NET przy użyciu funkcji DateDiff.
Potrzebujesz formularz, przycisk kilka wytwórni i kontroli DateTimePicker jak pokazano na obrazku poniżej:

aw przypadku kliknięcia przycisku będzie następujący kod:
txtAños.Text = DateDiff (DateInterval.Year, DateTimePicker1.Value, Now.Date) & "lat" txtMeses.Text = DateDiff (DateInterval.Month, DateTimePicker1.Value, Now.Date) & "miesięcy" txtSemanas.Text = DateDiff (DateInterval.Day, DateTimePicker1.Value, Now.Date) / 7 & "tydzień" txtDias.Text = DateDiff (DateInterval.Day, DateTimePicker1.Value, Now.Date) & "dni"
uruchomić aplikację, wybraliśmy przeszłą datę i naciśnij przycisk Oblicz. Wynik będzie podobny do tego zdjęcia:

Jest to bardzo prosty przykład, wystarczy spojrzeć na niektóre kodu i screeny i jestem pewien, że nie będzie miał wątpliwości, ale jeśli było mieć każdy, wystarczy zostawić swój komentarz.
Mam nadzieję, że to pomaga.
Informacje Bitacoras.com ...
Kurs w Bitacoras.com: Dzisiaj chcę pokazać jak wykonywać obliczenia między datami w Visual Basic za pomocą funkcji DateDiff.. Potrzebujesz formularz, przycisk jakąś etykietę? Kontroli DateTimePicker S, jak pokazano w nastę ...
Witam przede wszystkim dziękuję.
Mam obawy.
Dzisiaj jest 29 kwietnia 2009
Urodziłem się we wrześniu 1980 r.
zgodnie
txtAños.Text = DateDiff (DateInterval.Year, DateTimePicker1.Value, Now.Date) & "lat"
teraz mam 29 lat
ale to nie jest tak, mam 28 na moje urodziny niedawno we wrześniu
i modyfikować kod
Jeszcze raz dziękuję
Peter, ja przedłużyć ci niewielką informację:
Jeżeli interwał jest ustawiony na DateInterval.Year, wartość zwracana jest po prostu liczy się od roku częściach dwóch terminach podanych. Podobnie, wartość zwracana dla DateInterval.Month jest po prostu oblicza się na podstawie stron miesiąc i rok argumentów.
Na przykład, porównując 31 grudnia do 1 stycznia następnego roku, DateDiff zwraca 1 dla DateInterval.Year lub DateInterval.Month, ale tylko tyle minęło ciągu jednego dnia.
W takich przypadkach polecam, na przykład, zawsze używaj zakres i podzielić przez 365 DateInterval.Day i tak będzie miał dokładniejsze rysunku: 28.65 lata (na przykład), a jeśli chcesz tylko rok można korzystać z int () funkcji, która zwróci tylko część numeru.
Dobrym tego przykładem! Dzięki za info
Hej dobrzy ludzie pocztowych, którzy służyli mi prawdę tak daleko pomaga aparat jako I grax.
Twój post przyjaciel bardzo dobry jak Ci ustawić format DateTimePicker DD / MM / RRRR uzyskać przez qa Mi (czwartek, 12 maja 1999) i naprawdę nie wiem jak
Witaj Joseph:
po prostu trzeba zmienić kontrolę Formatdel własności, jak również:
DateTimePicker1.Format = DateTimePickerFormat.Short
Szczęście
Konsultacje to chyba zbyt proste, ale mogę zmienić sposób wyświetlania daty w datetiempicker, dla mnie wygląda następująco: piątek, 27 listopada 2009, muszę po prostu: 27/11/2009.
byłoby, dzięki.
Niestety, komentarz nie widział wcześniej, co odpowiada na moje pytanie, dzięki.
Dzień dobry ... Mam problem ... Używam dwóch DateTimePicker w VB.NET 2005 r. i po wybraniu daty w drugim DateTimePicker należy przyjmować różnicę między dwoma datami ... funkcja rozpoczyna się "valueChanged" sekunda ... Jeśli uruchomisz go, ale zawsze odejmować jeden dzień niż powinienem dać ... na przykład ... Jeśli odejdę dzisiejszą datę pierwszego DateTimePicker ust 21/12/2009) i wybrany w sekund następny dzień (22/12 / 2009) zwraca mi wartość 0 ... po wybraniu go na 23 zwraca mi wartość 1. Używana funkcja jest następująca:
TextBox1.Text = CStr (DateDiff (DateInterval.Day, DTP_ShipDate.Value, DTP_ETA.Value))
Ktoś wie co może być, co się dzieje proszę?
hello, how are you?
Mam zapytanie ich, jak mogę dostać tylko dzień FEHA, spójrz Mam pole tekstowe, gdzie pokazać feha "01/01/2009" i muszę jeden dzień.
Mam to
ciemny dzień jako liczbę całkowitą
dzień dzień = (tfecha.text)
Nie wnoszą nic, ale położyć
Dim rok As Integer
lat rok = (tfecha.text)
I pokazuje rok tutaj, ale muszę dni
Przepraszam jak robię dataTimerPicker I debuelva rok-miesiąc-dzień kość "yyyy / mm / dd" aby wybrać datę, muszę dla zapytania w MySQL i daty w tym formacie przechowuje je ("yyyy / mm / dd" ) .....
Gdybym mógł być agradesco przewodnik ... Z góry dziękuję.
BB ps jeśli istnieje funkcja i wykorzystanie własny format CustomFormat yyy / MM / DD
Dziękuję bardzo za informacje. To było bardzo pomocne.
Dobre zarządzanie nie jest bardzo dobra VB i pracuję to wydarzenie, ale pojawia się błąd 424 hit trochę zrobiłem, mam nadzieję, Twojej pomocy
Range ("I10") = DateDiff (DateInterval.Month, TextBox18.Value, Now.Date)
Dziękuję.
Dobre Elizeusz Przyjacielu, dziękuję za funkcję służył mi, ale muszę szczegół, wynik daje mi DateDiff jest negatywna, iść za przykładem jesteś dawać, ale równe, próby przekazania go jako ciąg, int, CInt, CStr i nic jakąś pomoc proszę.
Otóż Elizeusz przepraszam kłopoty, ale dobre i rozwiązać mój problem, ale myślę, że umieszczone parametry zamówienia są odwrotnie, a mam na myśli datę 1 i datę 2, a następnie powinny być data1 data2.
Dobrze korygowana, teraz zmaga się z porównania tego wyniku.
Hej znajomych Dziękujemy Bardzo przydatne
To bardzo proste lol
Reszta czasu później próbując znaleźć coś
Czy muszę oddać wielką przysługę!