با سلام خدمت کاربران عزیز وب سایت یاهو ۹۸ YAHOO

 

امروز براتون یه تکه کد کاربردی مهیا کرده ایم که امیدواریم مورد قبول شما عزیزان قرار بگیره.

 

تبدیل زمان (میلی ثانیه) به ساعت : دقیقه : ثانیه

Sub ConvertMillisecondsToString(t As Long) As String
   Dim hours, minutes, seconds As Int
   hours = t / DateTime.TicksPerHour
   minutes = (t Mod DateTime.TicksPerHour) / DateTime.TicksPerMinute
   seconds = (t Mod DateTime.TicksPerMinute) / DateTime.TicksPerSecond
   Return $"$1.0{hours}:$2.0{minutes}:$2.0{seconds}"$
'@yahoo98
End Sub