Dim emailList As New List(Of String) emailList.Add(" one@domain.com ") emailList.Add(" two@domain.com ") emailList.Add(" three@domain.com ") Dim output As StringBuilder = New StringBuilder For Each Email As String In emailList output.Append(IIf(String.IsNullOrEmpty(output.ToString), "", ";") & Email) Next
source share