计算秒差工具&计算日期的工具

使用方法：

1、根据需求填入相应的开始及结束的时分秒信息

2、软件自动计算出二者相差的秒数

注意事项：

1、软件并未对输入进行任何限制，所以请正确输入时间信息

2、不支持浮点数计算，所有的时分秒信息必须使用整数

下载链接：
https://www.lanzouj.com/iakkdzi

计算日期的工具

之前写了个计算秒差的小工具，然后又朋友留言需要一个计算日期差的工具，我本想把Win10自带的计算器推荐给他，

结果测试了一下，发现Win自带的计算器，增加的天数最多到999天，这样可能有些不便，所以我就写了这么一个日期计算器，希望有用！

使用说明：

1、软件打开自动获取本地日期，可根据自己的需求进行更改

2、选择增加的天、月、年、周信息，并填写数量（支持负数，没测过极限值）

3、软件自动计算相应的天数并在下方显示

备注：

目前测试没有发现问题！欢迎大家指正！

下载链接

https://www.lanzouj.com/ian8d5e
2020年3月25日22:52:10更新

源码分享：

;~ #include <bug.au3>
#include <Date.au3>

Global $Sec, $Min, $Hour, $Time1, $Time2, $Time
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:users倪沁东desktopform1.kxf
$Form1_1 = GUICreate("计算秒差", 344, 194, 192, 124)
$Input1 = GUICtrlCreateInput("18", 112, 48, 41, 21)
$Input2 = GUICtrlCreateInput("53", 184, 48, 41, 21)
$Input3 = GUICtrlCreateInput("20", 248, 48, 41, 21)
$Input4 = GUICtrlCreateInput("18", 112, 96, 41, 21)
$Input5 = GUICtrlCreateInput("54", 184, 96, 41, 21)
$Input6 = GUICtrlCreateInput("00", 248, 96, 41, 21)
$Input7 = GUICtrlCreateInput("", 112, 136, 89, 21)
$Label1 = GUICtrlCreateLabel("秒", 224, 138, 16, 17)
$Label2 = GUICtrlCreateLabel("时", 159, 51, 16, 17)
$Label3 = GUICtrlCreateLabel("分", 230, 52, 16, 17)
$Label4 = GUICtrlCreateLabel("秒", 296, 51, 16, 17)
$Label5 = GUICtrlCreateLabel("秒", 296, 100, 16, 17)
$Label6 = GUICtrlCreateLabel("分", 230, 98, 16, 17)
$Label7 = GUICtrlCreateLabel("时", 159, 100, 16, 17)
$Label8 = GUICtrlCreateLabel("开始时间：", 27, 51, 64, 17)
$Label9 = GUICtrlCreateLabel("结束时间：", 27, 96, 64, 17)
$Label10 = GUICtrlCreateLabel("历时：", 50, 136, 40, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case Else
                        main()
        EndSwitch

WEnd


Func main()
        $Hour = GUICtrlRead($Input1)
        $Min = GUICtrlRead($Input2)
        $Sec = GUICtrlRead($Input3)
        $Time1 = _TimeToTicks($Hour, $Min, $Sec)
        $Hour = GUICtrlRead($Input4)
        $Min = GUICtrlRead($Input5)
        $Sec = GUICtrlRead($Input6)
        $Time2 = _TimeToTicks($Hour, $Min, $Sec)
        $Time = ($Time2 - $Time1) / 1000
        GUICtrlSetData($Input7, $Time)
EndFunc   ;==>main