精确到毫秒,代码如下
'1.csv大小为23.6MB
Dim t1 As Date = Now
Dim tmp() = System.IO.File.ReadAllLines("d:\1.csv")
Dim t2 As Date = Now
Debug.Print("用时:" & (t2 - t1).TotalMilliseconds)
输出结果如下图
精确到毫秒,代码如下
'1.csv大小为23.6MB
Dim t1 As Date = Now
Dim tmp() = System.IO.File.ReadAllLines("d:\1.csv")
Dim t2 As Date = Now
Debug.Print("用时:" & (t2 - t1).TotalMilliseconds)
输出结果如下图