spero di aver capito cosa ti serve..

codice:
Private Sub Command1_Click()
  principale.editor.Text = principale.editor.Text + "T1=" + testopx.Text
end Sub