В TextBox нужно записывать дату и время, но как это сделать проще - VB

Формулировка задачи:

Добрые люди, решился взяться за старый добрый vb 6.0 , но возникла вот такая проблемка с записью даты и время в textbox: Суть в том что в textbox нужно записывать дату и время, но как это сделать проще? Хочу что бы время записывалось так: часы : минуты : секунды , а дата в свою очередь также только через точку. Но ручками постоянно выставлять двоеточие не особо хочется. Как объяснить этому бейсику что после написания двух знаков нужно ставить двоеточие(точку). или может есть какое-то альтернативное решение помогите плз!

Решение задачи: «В TextBox нужно записывать дату и время, но как это сделать проще»

textual
                            Листинг программы 
                        

                            Private Sub Text1_Change()
Dim t
t = Text1.Text
If Text1.Text Like "######" Then
t = Mid(t, 1, 2) & ":" & Mid(t, 3, 2) & ":" & Mid(t, 5, 2)
Text2 = t
If 23 - Val(Mid(t, 1, 2)) >= 0 And 59 - Val(Mid(t, 4, 2)) >= 0 And 59 - Val(Mid(t, 7, 2)) >= 0 Then
Text1.Text = t
End If
End If
End Sub
                        