給你個例子:
中方網(wǎng)站制作公司哪家好,找成都創(chuàng)新互聯(lián)!從網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)公司等網(wǎng)站項目制作,到程序開發(fā),運營維護(hù)。成都創(chuàng)新互聯(lián)2013年開創(chuàng)至今到現(xiàn)在10年的時間,我們擁有了豐富的建站經(jīng)驗和運維經(jīng)驗,來保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選成都創(chuàng)新互聯(lián)。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyEndDate As New DateTime(2012, 8, 8)
Dim MyStartDate As DateTime = DateTime.Now
Dim MySpan As TimeSpan = MyEndDate.Subtract(MyStartDate)
Dim MyInfo As String = "離2012年8月8日還有" + _
Math.Round(MySpan.TotalDays, 0).ToString() + "天"
MessageBox.Show(MyInfo, "信息", _
MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub
DateAdd(dateinterval, number, datetime) 對日期或時間作加減。
DateDiff(dateinterval, date1, date2) 計算兩個日期或時間間的差值。
DatePart (dateinterval, date) 依接收的日期或時間參數(shù)傳回年、月、日或時間。
DateSerial(year, month, day) 將接收的參數(shù)合并為一個只有日期的Date 型態(tài)的數(shù)據(jù)。
DateValue(datetime) 取得符合國別設(shè)定樣式的日期值,并包含時間。
Day(datetime)依接收的日期參數(shù)傳回日。
直接用兩個日期相減,返回一個timespan實例,它的Days屬性就是天數(shù)。
dim d1 as datetime, d2 as datetime
dim days as integer
d1 = DateTime.Today.AddDays(-1)
d2 = DateTime.Today
days = (d2 - d1).Days
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'));
其實vb提供了一個計算兩個日期相差的函數(shù)datediff,
在實際應(yīng)用之中我們可以進(jìn)行日期相減運算,但是vb推薦的還是
使用vb自己提供的內(nèi)部函數(shù)為好!
一個例子:
Private Sub Command1_Click()
Dim days As Integer
Dim data1 As Date
Dim data2 As Date
data1 = #2/21/2006# 'O2 / 21 / 2006
data2 = #3/21/2006#
days = DateDiff("d", data1, data2)
Text1.Text = Str(days)
End Sub
.Net中是不能使用控件的默認(rèn)屬性的,所有屬性都要顯式地寫出來。
應(yīng)該這樣:
Dim resulttime As Integer = DateDiff(DateInterval.Day, DateTimePicker1.Value, DateTimePicker2.Value)
MessageBox.Show(resulttime)
另外,resulttime也最好寫成:resulttime.ToString ,這樣顯式地轉(zhuǎn)換成字符串類型。