txtAAAA.text=txtAAAA.text & vbcrlf & nuovotesto