First problem (in form_load):
me.show
main.Setfocus
Second:
Dunno which box we are talking about... the big multi-line one?
Third (on text1's keypress event, or whatever box you do the typing in):
if keyascii = 13 then
keyascii = 0
main.text = text1.text & vbcrlf & main.text
end if
' /* Or Something Like This ^ */