Public Class Form1

成都創(chuàng)新互聯(lián)-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設、高性價比安陸網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式安陸網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設找我們,業(yè)務覆蓋安陸地區(qū)。費用合理售后完善,十載實體公司更值得信賴。
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
實際情況修改下。
End Class
Date.Now() As Date ’日期時間
這可以在對象瀏覽器中查一查嗎。
Date.Date() As Date '日期
Date.Time() As Date ‘時間
1、時間可以直接比較大小,定義兩個時間的變量,直接使用或者即可判斷,跟數(shù)據(jù)大小判斷是一樣的
2、時間差值,可以使用DateDiff函數(shù)進行
3、比如取一個現(xiàn)在的時間now,使用Year、month、day、hour、min、sec函數(shù)可以取到now的年份、月、日、小時、分鐘和秒
分享名稱:vb.net時間計算函數(shù)的簡單介紹
本文路徑:http://chinadenli.net/article8/hhghip.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供定制開發(fā)、品牌網(wǎng)站建設、動態(tài)網(wǎng)站、定制網(wǎng)站、電子商務、微信公眾號
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉載內(nèi)容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯(lián)