时间加减计算器软件下载（时间加减计算器）

大家好，我是小新，我来为大家解答以上问题。时间加减计算器软件下载，时间加减计算器很多人还不知道，现在让我们一起来看看吧！

1、Dim objfs,objargs Set objargs=WScript.Arguments Set objfs=CreateObject("scripting.filesystemobject") Set f=objfs.OpenTextFile(objargs(0),1) Dim stime,s sec=0 Do While f.AtEndOfStream<>True stime=f.ReadLine s=Split(stime,":",-1,1) sec=sec+CInt(s(0)*60+s(1)) Loop WScript.Echo sec/60 & " 分" 终于写出来了。

2、呵呵，用vbs写。

3、你把代码保存为a.vbs，然后把要计算的时间按 5:15 5:17 5:26 5:26 5:34 5:42 这样的格式写在一个文本文件里，然后把这个文本文件拖到a.vbs这个文件上就出来结果了。

4、 记住只能是保存为以上格式的才行。

本文到此讲解完毕了，希望对大家有帮助。