public long Seconds2Bytes2( double position )
Public Function Seconds2Bytes2 ( _ position As Double _ ) As Long