我是vb express的新手,正在寻找一种方法来读取文本文件中的两行,然后将它们之间的差异循环到最后它是一个简单的时钟输出系统时钟,它存储每个人的时钟开关时间在像这样的文本文件中
03/11/2014 09:55:02
03/11/2014 14:55:02
03/11/2014 16:55:02
03/11/2014 19:55:02
04/11/2014 09:00:02
04/11/2014 13:00:00
我知道我使用DateDiff来获取时间,但我只希望他们计算出第1行和第2行之间的区别,然后是第3行和第4行,并将它们全部添加起来是否可以在不过度复杂的情况下实现这一点?
答案 0 :(得分:0)
我们已经解决了这个问题我已经通过循环阅读文本提交来完成此操作,此时我尚未进行任何验证,以显示已经忘记但基本知识存在的人
Dim FILE_NAME As String = "times\08.txt"
Dim start As DateTime
Dim finish As DateTime
Dim total
If System.IO.File.Exists(FILE_NAME) = True Then
Dim objReader As New System.IO.StreamReader(FILE_NAME)
Do While objReader.Peek() <> -1
start = objReader.ReadLine() & vbNewLine
finish = objReader.ReadLine() & vbNewLine
duration = DateDiff(DateInterval.Minute, start, finish)
total = duration + total
Loop
Label2.Text = total