在VB.NET中如何确定两个日期之间的天数

发布时间：2020-12-16 23:24:20 所属栏目：大数据来源：网络整理

导读：在应用开发中，开发人员经常要进行各种各样的日期处理。如果你需要一种简单的方法来计算出给定两个日期间的天数，不妨考虑使用VB.NET中的TimeSpan对象。列表A向你演示了如何使用TimeSpan对象来获得两个日期间的时间值。今后，你可以使用Subtract方法来获得

在应用开发中，开发人员经常要进行各种各样的日期处理。如果你需要一种简单的方法来计算出给定两个日期间的天数，不妨考虑使用VB.NET中的TimeSpan对象。

列表A向你演示了如何使用TimeSpan对象来获得两个日期间的时间值。今后，你可以使用Subtract方法来获得两个日期间的实际天数。

关于列表A的一些说明

首先，我们声明一个Date类型的变量dtStartDate，并赋初值为2007年一月一日。同时，还声明了其它一些将会用到的变量，包括：TimeSpan的一个实例tsTimeSpan，整型数iNumberOfDays，字符串型变量strMsgText。设定变量tsTimeSpan的值为当前日期/时间值与dtStartDate值得差。

为了计算出当前日期/时间（Now）与dtStartDate之间的天数，我们使用TimeSpan对象的Days属性，设定它的值为iNumberOfDays 。然后，创建一个text对象，其值是将必要文本和strMsgText变量的值连接在一起，该对象将显示在消息框中，最后一步是在消息框中显示字符串变量strMsgText的值。

Code:

PrivateSubDetermineNumberofDays()
DimdtStartDateAsDate="1/1/2007"
DimtsTimeSpanAsTimeSpan
DimiNumberOfDaysAsInteger
DimstrMsgTextAsString
tsTimeSpan=Now.Subtract(dtStartDate)
iNumberOfDays=tsTimeSpan.Days
strMsgText="Thetotalnumberofdayselapsedsince"&_
dtStartDate.ToShortDateString()&"is:"&iNumberOfDays.ToString()
MsgBox(strMsgText)
EndSub

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!