今天,我要表明如何執行Visual Basic中的舒適之間的日期計算。NET中使用DateDiff函數。
在下面的圖片所示,需要一個窗體,按鈕,一些標籤的DateTimePicker控件:

並會在按鈕的Click事件下面的代碼:
txtAños.Text= DATEDIFF(DateInterval.Year,DateTimePicker1.Value,Now.Date)&“年” txtMeses.Text = DATEDIFF(DateInterval.Month,DateTimePicker1.Value,Now.Date)&“月” txtSemanas.Text = DATEDIFF(DateInterval.Day,DateTimePicker1.Value,Now.Date)/ 7和“週” txtDias.Text = DATEDIFF(DateInterval.Day,DateTimePicker1.Value,Now.Date)及“天”
運行應用程序,我們選擇了一個過去的日期,按計算按鈕。 其結果將是類似這個圖片:

這是一個非常簡單的例子,只要看看一些代碼和截圖,我敢肯定,你不會有疑慮,但如果你有任何問題,只需留下您的評論。
希望這有助於。
信息Bitacoras.com ...
在Bitacoras.com率:今天,我要說明如何在Visual Basic中的日期之間執行計算的淨使用DateDiff函數。 需要一個窗體,按鈕,一些標籤的DateTimePicker控制,如在FOL所示...
首先感謝你。
我有一個問題。
今天是2009年4月29日,
我出生於1980年9月
根據
txtAños.Text= DATEDIFF(DateInterval.Year,DateTimePicker1.Value,Now.Date)&“年”
現在我已經29歲
但事實並非如此,我有我的生日在九月28日前
並修改代碼
再次感謝
彼得,我謹向你一點點的信息:
如果時間間隔設置為DateInterval.Year,返回值是簡單地計算從兩個給定日期的一年。 同樣,為DateInterval.Month返回值是簡單地從各方論點一年一個月計算。
例如,比較時年12月31日至明年1月1日起,DateDiff返回1為DateInterval.Year或DateInterval.Month,但只是作為已通過一個單一的一天。
我建議者,例如,經常使用的365 DateInterval.Day範圍和鴻溝,並因此將有1更準確的數字:28.65多年(例如)和如果你只是想今年你可以使用的詮釋()函數將返回只有部分的數量。
一個很好的例子! 感謝樓上的信息
嘿好後男人誰擔任我說實話,到目前為止,幫助作為我grax的相機。
您的文章非常要好的朋友,像你這樣的設置在DateTimePicker格式DD / MM / YYYY的我得到由:QA米,1999年5月12日(星期四),真不知道如何
您好約瑟夫:
你只要有改變所有權Formatdel的控制,以及:
DateTimePicker1.Format = DateTimePickerFormat.Short
運氣
諮詢也許是太容易了,但我可以改變的日期,在datetiempicker顯示我看起來像的方式:2009年11月27日(星期五),我只需:27/11/2009。
那會,感謝。
抱歉,評論沒有見過的,回答我的問題,感謝。
下午好...我有一個問題...我用兩個DateTimePicker控件和2005年在vb.net中,當我選擇第二的DateTimePicker的日期,我應該採取區別兩個日期之間...函數開始“的valueChanged”第二...如果你運行它,但我總是減有一天,我應該給...例如...如果我離開第一的DateTimePicker(21/12/2009)今天的日期,並在第二個選擇的第二天(22/12 / 2009)返回一個0值,如果你選擇他23的回報,我值1。 使用的功能如下:
TextBox1.Text = CSTR(DATEDIFF的(DateInterval.Day,DTP_ShipDate.Value,DTP_ETA.Value))
任何人都知道可能是什麼情況,請嗎?
你好,你怎麼樣?
我有一個查詢,我可以得到公正的FEHA的日子,看我告訴FEHA“01/01/2009”,我需要有一天,我有一個文本框。
我有這個
昏暗的一天作為整數
一天一天(tfecha.text)
我不帶任何東西,但放
暗淡的一年將作為整數
一年=年(tfecha.text)
我顯示,今年在這裡,但我需要的一天
原諒我,因為我使我dataTimerPicker debuelva年 - 月 - 日骨“YYYY / MM / DD”選擇一個日期,我需要查詢MySQL和保持這種格式的日期(“YYYY / MM / DD” )......
如果我可以做的agradesco指南...在此先感謝。
VB PS如果有功能和使用自定義格式,CustomFormat YYY / MM / DD
非常感謝你的信息。 這是一個很大的幫助。
良好的管理是不是很好的VB和我的工作這一事件,但我得到錯誤424打小我已經做了,我希望你的幫助
範圍(“I-10”)= DATEDIFF(DateInterval.Month,TextBox18.Value,Now.Date)
謝謝。
感謝您的功能很好的朋友以利沙,擔任我,但我一個細節,結果給我的DATEDIFF負,遵循,例如你是給予,但平等,試圖通過為字符串,整數,CINT,CSTR,並沒有一些幫助。
以利沙原諒的麻煩,但良好的解決我的問題,但我覺得你放在參數的順序反過來,我的意思是1日和2日,然後應該是Date1的Date2的。
以及糾正,現在這樣的結果比較掙扎。
嘿朋友謝謝你非常有用
這是很容易的LOL
殘餘時間後試圖找到
我投一個大忙!