I have a double animation I know I can set the duration using `:Duration="00:00:30"` for example but I would be able to write in a `Textbox` the duration value when the file is running right before start the animation.

Basically what I need is `Duration=" Time written within the TextBox"`

This is what I tried

```
Public Sub Set_Laptime(ByVal sender, ByVal KeyUpEventArgs, ByVal e)
    Dim ts As TimeSpan
    Dim LapTime As Duration
    ts = (TextBox1.Text)
    LapTime = New Duration(ts)
End Sub

```