重载解析失败，因为无法使用这些参数调用可访问的“睡眠”

Question

I have the following code:

Dim MyFile As String
MyFile = ("C:\Book1.xlsx")
Dim infoReader As System.IO.FileInfo
infoReader = My.Computer.FileSystem.GetFileInfo(MyFile)
Threading.Thread.Sleep(infoReader.Length / 1000)

How can I solve the following error:

Answer 1

您需要将数字（双精度）转换为timeSpan：

Dim sleepTime As Timespan = TimeSpan.FromSeconds(infoReader.Lenth/1000) 

Answer 2

The result a division operation ( infoReader.Length / 1000 ) is a floating point number ( Double in our case since FileInfo.Length property is of type Long ).

On the other hand, the Threading.Thread.Sleep() overload you're most likely wanting to use expects an Int parameter.

Cast the division result to Int explicitly (is the files are not too big):

Threading.Thread.Sleep(CInt(infoReader.Length / 1000))

Or use the second overload accepting TimeSpan , using the FromMilliseconds method which accepts Double :

Threading.Thread.Sleep(TimeSpan.FromMilliseconds(infoReader.Length / 1000))

Answer 3

Divide it using the integer division. The sleep function doesn't take a double as parameter.

Threading.Thread.Sleep(infoReader.Length \ 1000)