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

Question

我已经使用Outlook中的自定义窗体作为任务管理。我想问一下如何解决以下问题。

当有人打开新任务我有一个自定义窗体To字段添加用户并分配任务。

我的问题是，当一个任务的所有者打开任务时，我希望To字段为空，并将其保留在另一个字段中（如Textbox）。因此，当用户需要将同一任务分配给第二个用户以在To中添加新用户时，以及在更新Textbox时没有用新值替换旧值时。这是我创建的代码。我使用一个按钮，当点击在Textbox中添加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 

有人可以提出一些建议吗？

Answer 1

objtest.Value = objtest.Value & Recipients.Item(i) & "; "?

从问题帕特里克comment服用。