delimiter: незадължителен низ, с който се разделят поднизовете в низа резултат. Подразбираният разделител е знакът интервал. Ако Delimiter е низ с нулева дължина "", поднизовете се долепват без разделител.
Пример:
Dim a(3)Sub main()
a(0)="ABCDE"
a(1)=42
a(2)="MN"
a(3)="X Y Z"
JStr = Join1()Call Show(JStr, Split1(JStr))
JStr = Join2()Call Show(JStr, Split1(JStr))
JStr = Join3()Call Show(JStr, Split1(JStr))EndSubFunction Join1()
Join1 = Join(a(),"abc")EndFunctionFunction Join2()
Join2 = Join(a(),",")EndFunctionFunction Join3()
Join3 = Join(a())EndFunctionFunction Split1(aStr)
Split1 = Split(aStr,"D")EndFunctionSub Show(JoinStr, TheArray)
l = LBound(TheArray)
u = UBound(TheArray)
total$="============================="+ Chr$(13)+ JoinStr + Chr$(13)+ Chr$(13)For i = l To u
total$= total$+ TheArray(i)+ Str(Len(TheArray(i)))+ Chr$(13)Next i
MsgBox total$EndSub