Public Class Form1
創(chuàng)新互聯(lián)建站主營濱海網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營網(wǎng)站建設(shè)方案,成都App定制開發(fā),濱海h5小程序定制開發(fā)搭建,濱海網(wǎng)站營銷推廣歡迎濱海等地區(qū)企業(yè)咨詢
Private Past As Date
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Past = Now
IO.File.AppendAllText("test.txt", Past.ToString, System.Text.Encoding.Default)
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim Now1 As Date = CDate(IO.File.ReadAllText("test.txt", System.Text.Encoding.Default))
Dim Now2 As Date = Now
MsgBox("從" Now1.ToString "到" Now2.ToString "經(jīng)過了" CStr(CDate((Now2 - Now1).ToString)))
End Sub
實(shí)際情況修改下。
End Class
使用datediff函數(shù)
textbox3.text=datediff("d","textbox1.text","textbox2.text")
說明一下:
“d”表示“天”
還可以用“y”,"m","d","h","n","s"
分別表示“年”“月”“日”“時(shí)”“分”“秒”
在應(yīng)用開發(fā)中 開發(fā)人員經(jīng)常要進(jìn)行各種各樣的日期處理 如果你需要一種簡單的方法來計(jì)算出給定兩個(gè)日期間的天數(shù) 不妨考慮使用VB NET中的TimeSpan對象
列表A向你演示了如何使用TimeSpan對象來獲得兩個(gè)日期間的時(shí)間值 今后 你可以使用Subtract方法來獲得兩個(gè)日期間的實(shí)際天數(shù)
關(guān)于列表A的一些說明
首先 我們聲明一個(gè)Date類型的變量dtStartDate 并賦初值為 年一月一日 同時(shí) 還聲明了其它一些將會(huì)用到的變量 包括 TimeSpan的一個(gè)實(shí)例tsTimeSpan 整型數(shù)iNumberOfDays 字符串型變量strMsgText 設(shè)定變量tsTimeSpan的值為當(dāng)前日期/時(shí)間值與dtStartDate值得差
lishixinzhi/Article/program/net/201311/13424
function getTime2Time($time1, $time2)
{
var time1 = arguments[0], time2 = arguments[1];
time1 = Date.parse(time1)/1000;
time2 = Date.parse(time2)/1000;
var time_ = time1 - time2;
return (time_/(3600*24));
}
document.write(getTime2Time('2016-08-02', '2016-07-02'));