Private Sub DURATION_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles DURATION.GotFocus
If Not (MARK_OUT.Text = "" And MARK_IN.Text = "") Then
DURATION.Text = DateTime.Parse(MARK_OUT.Text).Subtract(DateTime.Parse(MARK_IN.Text)).ToString()
End If
End Sub