Arvutused kuupäevade vahel (DateTimePicker - DateDiff)
Postitaja Elisha in kontroll , näited , Features kohta 04 28., 2009 | 18 vastust
Täna ma tahan näidata, kuidas teha arvutusi kuupäevade vahel mugav Visual Basic. Net abil DateDiff funktsiooni.
Vajad vorm, nupp, mõned etiketi ja DateTimePicker kontrolli, nagu näidatud alloleval pildil:
ja nupule click juhul ei järgmine kood:
txtAños.Text = DateDiff (DateInterval.Year, DateTimePicker1.Value, Now.Date) & "aastat" txtMeses.Text = DateDiff (DateInterval.Month, DateTimePicker1.Value, Now.Date) & "kuu" txtSemanas.Text = DateDiff (DateInterval.Day, DateTimePicker1.Value, Now.Date) / 7 & "nädalat" txtDias.Text = DateDiff (DateInterval.Day, DateTimePicker1.Value, Now.Date) ja "päeva"
käivitada rakendus, mis me valisime viimase kuupäeva ja vajutage Arvuta nuppu. Tulemuseks on umbes selline pilt:
See on väga lihtne näide, lihtsalt pilk natuke koodi ja pilte ja ma olen kindel, et sa ei pea kahtlusi, aga kui sa ei mingit, jäta oma kommentaar.
Loodan, et see aitab.
18 Responses to "arvutuste vahel kuupäevad (DateTimePicker - DateDiff)"
Kommentaar
Informatsioon Bitacoras.com ...
Määr Bitacoras.com: Täna ma tahan näidata, kuidas teha arvutusi vahel kuupäevad Visual Basic. Net abil DateDiff funktsiooni. Vajad vorm, nupp, mõned etiketil? S DateTimePicker kontrolli all, nagu näidatud järgmisel ...
Tere kõigepealt tänan.
Mul on mure.
Täna on 29. aprill 2009
Sündisin september 1980
järgi
txtAños.Text = DateDiff (DateInterval.Year, DateTimePicker1.Value, Now.Date) & "aastat"
nüüd on mul 29 aastat
kuid see ei ole nii, mul on 28 mu sünnipäev hiljuti september
ja muuta koodi
Tänan
Peter, ma ulatada sulle natuke teavet:
Kui intervall on seatud DateInterval.Year, tagastatav väärtus on lihtsalt arvutatud aasta osades 2 toodud kuupäevadel. Samuti tagastab väärtuse eest DateInterval.Month lihtsalt arvutatakse poole aasta ja kuu argumente.
Näiteks kui võrrelda 31. detsember - 1 jaanuar järgmisel aastal, DateDiff tagastab 1 DateInterval.Year või DateInterval.Month, kuid ainult nii palju on möödunud üks päev.
Sellistel juhtudel soovitan näiteks alati kasutada erinevaid ja lõhet, 365 DateInterval.Day ja nii oleks täpsem: 28,65 aastat (näiteks) ja kui tahad lihtsalt aastas saab kasutada int () funktsiooni, mis tagastab ainult osa number.
Hea näide! Tänan info
Kuule hea post mehed, kes teenisid mulle tõtt seni aitab kaamera nagu ma grax.
oma postituse väga hea sõber nagu sina määrata DateTimePicker formaat PP / KK / AAAA ma hakkama qa MI (neljapäev, 12 mai, 1999) ja tõesti ei tea, kuidas
Tere joseph:
sa lihtsalt pead muutma omandisse Formatdel kontroll samuti:
DateTimePicker1.Format = DateTimePickerFormat.Short
Õnn
Konsultatsioon on ehk liiga lihtne, aga ma võiks muuta seda, kuidas kuvada kuupäeva datetiempicker, mulle tundub: reede 27 november, 2009, mul on vaja lihtsalt: 27/11/2009.
mis oleks, aitäh.
Vabandust, kommentaar polnud enne näinud, mis vastab minu küsimusele, aitäh.
Tere päevast ... mul on probleem ... ma kasutan 2 DateTimePicker sisse vb.net 2005 ja kui ma valida kuupäeva 2. DateTimePicker ma peaksin kahe kuupäeva vahe ... funktsioon on alustatud "ValueChanged" 2. ... Kui sul tekib see, aga ma alati lahutama ühel päeval, kui ma peaks andma ... näiteks ... Kui ma jätan tänase esimese DateTimePicker (21/12/2009) ja valida teine järgmisel päeval (22/12 / 2009) tagastab mulle väärtus 0 ... kui valid talle 23 naaseb mind väärtus 1. Funktsiooni kasutada on järgmine:
TextBox1.Text = CStr (DateDiff (DateInterval.Day, DTP_ShipDate.Value, DTP_ETA.Value))
Keegi teab mis võib olla, mis juhtub siis?
tere, kuidas läheb?
Mul on päringu neid, sest ma saan alles päeval FEHA, vaata mul on tekstikasti, kus ma näitan feha "2009/01/01" ja mul on vaja üks päev.
Mul on see
päevasõidutulede päeval täisarv
päev = päev (tfecha.text)
Ma ei too midagi, kuid seada
Dim aasta As Integer
aasta = aasta (tfecha.text)
Ma näitab aasta siin, aga ma pean päev
Vabandust kui ma dataTimerPicker ma debuelva aasta-kuu-päev luu "yyyy / mm / dd", et valida kuupäev, mul on vaja jaoks päringu MySQL ja kuupäevad selles formaadis hoiab neid ("yyyy / mm / dd" ) .....
Kui ma oleks agradesco juhend ... Thanks in advance.
vB ps kui on olemas funktsiooni ja kasutada kohandatud vormingu ja CustomFormat yyy / KK / PP
Tänan teabe eest. See oli suureks abiks.
Hea juhtimine ei ole väga hea VB ja ma töötan selle sündmuse aga ma saan viga 424 löögi vähe ma olen teinud, ma loodan teie abi
Range ("I10") = DateDiff (DateInterval.Month, TextBox18.Value, Now.Date)
Aitäh.
Hea sõber Elisha tänu oma funktsiooni teeninud mind, aga mul on detail, tulemus annab mulle DateDiff on negatiivne eeskuju teil on anda vaid võrdsed, proovida andke seda kui string, int, Cint, cstr ja midagi veidi abi palun.
Noh Elisha vabandage probleeme, kuid hea ja lahendada minu probleem, aga ma arvan, et sa tellimuse parameetrid on vastupidi, ja ma mõtlen päeval 1 ja kuupäev 2 ja siis peaks olema kuupäev1 kuupäev2.
Hästi parandatud, nüüd võitleb võrrelda seda tulemust.
Kuule sõber Tänan Kasulik
See on väga lihtne lol
Jäänuk aeg hiljem püüdnud leida midagi
Ma enamus suure teene!