https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=10657#CommentId22503
投稿者 shu  (社会人) 投稿日時 2012/1/16 10:38:14
        Dim tm As New TimeSpan(0, 0, CInt(TextBox1.Text))
        TextBox2.Text = tm.ToString()

こんなんでどうでしょう？
0