Vba Outlook文本框值更新而不是替换

我在

Outlook

中使用了自定义表单作为任务管理。我想问一下如何解决我所遇到的以下问题

当有人打开新任务时，我有一个带有

To

字段的自定义表单，用于添加用户并分配任务

我的问题是，当任务的所有者打开任务时，我希望

To

字段为空，并将分配的内容保留在另一个字段中（作为

文本框

）。因此，当用户需要将同一任务分配给第二个用户以将

中的新用户添加到

时，以及当用户需要更新

文本框

而不是用新值替换旧值时。这是我创建的代码。我使用一个按钮，在

文本框

中单击添加值from To字段时，唯一要做的是用新值替换旧值

Sub  add_click ()

 Set objPage = Item.GetInspector.ModifiedFormPages("Assign Task")
 Set objControl = objPage.Controls("ListBox1")
 Set objassigncheck = objPage.Controls("CheckBox1")
 Set objsend = objPage.Controls("sendtask")
 Set objTo = objPage.Controls("To")
 Set objtest = objPage.Controls("TextBox4")
 Set objcombo1 = objPage.Controls("ComboBox1")

  For i=1 to Item.Recipients.Count
    objtest.Value=Join(Array(Recipients.Item(i)),"; ")
  Next
End Sub

---

有人能提出建议吗？

objtest.Value=objtest.Value&Recipients.Item（i）&“？

从帕特里克的问题

---

尝试了

objtest.Value=objtest.Value&Recipients.Item（i）&“

？效果很好。非常感谢