WEB上にある、経過時間の1/100秒単位データをローカルで再現したくプログラムを作っています。

そこで、1/100秒の数値を時間に変換するようにしたいのですが、若干誤差が出てきて困っています。



「プログラム」

 Public Function TimeFormat(ByVal T As Object) As String

        TimeFormat = Format(T \ 360000, "0\:")
        T = T Mod 360000
        TimeFormat = TimeFormat & Format(T \ 6000, "00\:")
        T = T Mod 6000
        TimeFormat = TimeFormat & Format(T, "00\.00")
    End Function


「呼び出し」

 TextBox1.Text = TimeFormat(数値)


----------------------------------------------------

173238→WEB(28:51)、作成したプログラム(28:52)


172119→WEB(28:39)、作成したプログラム(28:41)


これは何故このように誤差が出てしまうのでしょうか？


よろしくお願いいたします。




vb2010　/windows7