EditText in code versus in Designer

In the following code, EdtTxt_EnterPressed is never called when Enter is pressed on the EdtTxt view. It works if EdtTxt is defined in Designer instead, however. What is wrong here?

Sub Globals
Dim EdtTxt As EditText
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Test")
EdtTxt.Initialize("")
Activity.AddView(EdtTxt,20,20,100,40)
EdtTxt.RequestFocus
End Sub
Sub EdtTxt_EnterPressed
EdtTxt.Text="Good!"
End Sub
Sub Activity_Resume
End Sub