计算0时0分到当前时间的秒数差，vb.net代码应该怎么写？

Sub Main()

创新互联公司专注于白山网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供白山营销型网站建设，白山网站制作、白山网页设计、白山网站官网定制、重庆小程序开发服务，打造白山网络公司原创品牌,更为您提供白山网站排名全网营销落地服务。

Dim dtNow As DateTime

dtNow = DateTime.Now

Dim dtBegin As DateTime

dtBegin = New DateTime(dtNow.Year, dtNow.Month, dtNow.Day)

Dim second As Integer

second = (dtNow - dtBegin).TotalSeconds

Console.WriteLine(second)

Console.Read()

End Sub

VB.NET 如何计算时间差

使用datediff函数

textbox3.text=datediff("d","textbox1.text","textbox2.text")

说明一下：

“d”表示“天”

还可以用“y”,"m","d","h","n","s"

分别表示“年”“月”“日”“时”“分”“秒”

VB.net窗体程序的time控件，可以识别到的最小时间差是多少纳秒 ?

VB有现成的函数：

DateDiff(格式,日期1,日期2)

如今天到2010-5-1 8:00:00的时间差，代码：

DateDiff("yyyy",Now,#2010-5-1 8:00:00#) '还有几(整)年

DateDiff("q",Now,#2010-5-1 8:00:00#) '还有几(整)季度

DateDiff("m",Now,#2010-5-1 8:00:00#) '还有几(整)月

DateDiff("d",Now,#2010-5-1 8:00:00#) '还有几(整)天

DateDiff("ww",Now,#2010-5-1 8:00:00#) '还有几(整)周

DateDiff("h",Now,#2010-5-1 8:00:00#) '还有几(整)小时

DateDiff("n",Now,#2010-5-1 8:00:00#) '还有几(整)分钟

DateDiff("s",Now,#2010-5-1 8:00:00#) '还有几(整)秒