使用TimeDifference,实现两个时间变量的相减,得出秒间隔

本文主要是介绍使用TimeDifference,实现两个时间变量的相减,得出秒间隔，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

在Lotusscript中如何实现两个时间变量相减,我们可以使用TimeDifference函数:

 

首先两个时间变量的格式必须相同:

 Dim strDate As NotesDateTime
 Dim endDate As NotesDateTime
 
 Set strDate = New NotesDateTime(Format("01/09/2011","dd/mm/yyyy"))
 Set endDate = New NotesDateTime(Format("01/09/2011","dd/mm/yyyy"))

 

然后通过imeDifference方法,取得两个时间秒差值:

datediff = endDate.TimeDifference(strDate)/60/60/24

'输出查看天数
Msgbox datediff

 

 

 

source code:

Sub Initialize
 On Error Goto errhandle
 
 Dim strDate As NotesDateTime
 Dim endDate As NotesDateTime
 
 Set strDate = New NotesDateTime(Format("01/09/2011","dd/mm/yyyy"))
 Set endDate = New NotesDateTime(Format("20/09/2011","dd/mm/yyyy"))
 
 datediff = endDate.TimeDifference(strDate)/60/60/24
 Msgbox datediff
 
 Exit Sub
errhandle:
 Msgbox "两个时间变量相减:" & Erl & Error$
 Exit Sub
End Sub

这篇关于使用TimeDifference,实现两个时间变量的相减,得出秒间隔的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---