Paganahin ang JavaScript sa browser upang ipakita ang mga pahina ng Tulong sa LibreOfficeDev.
Sumali sa Function
Ibinabalik ang isang string mula sa isang bilang ng mga substring sa isang string array.
Sumali (SourceArray Bilang Bagay, delimiter Bilang String) Bilang String
String
SourceArray : Isang string array.
delimiter : Isang opsyonal na character na string na ginagamit upang paghiwalayin ang mga substring sa resultang string. Ang default na delimiter ay ang space character. Kung Delimiter ay isang string ng haba zero "", ang mga substrings ay pinagsama nang walang separator.
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))
End Sub
Function Join1()
Join1 = Join(a(), "abc")
End Function
Function Join2()
Join2 = Join(a(), ",")
End Function
Function Join3()
Join3 = Join(a())
End Function
Function Split1(aStr)
Split1 = Split(aStr, "D")
End Function
Sub 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$
End Sub