Private Sub TextField1_TextChanged (OldText As String, NewText As String)
    Log("TextField1_TextChanged " &  OldText & " -> " & NewText)
End Sub
Private Sub TextView1_TextChanged (OldText As String, NewText As String)
    Log("TextView1_TextChanged: " &  OldText & " -> " & NewText)
End Sub