تبديل ثانيه به ساعت و دقيقه و ثانيه

[MohammadGh2011]

سلام عزيزان
من يك TextBox دارم و ميخوام وقتي داخلش ثانيه نوشته شد مثلا 120
برام Print كنه 0ساعت و 2دقيقه و 0 ثانيه(00:02:00)
ممنونم
جستجو كردم و مطالب زيادي هم ديدم و لي...

[MohammadGh2011]

دوباره سلام
دوستان با اين كه خيلي جستجو كردم و مطالب زيادي ديدم فكر كنم تونستم بنويسمش.ممنونم از همتون

B = Text1

saat = B \ 3600

minn = B - (saat * 3600)

Min = minn \ 60

secn = minn - (Min * 60)

sec = secn

Print saat & ":" & Min & ": " & sec