Satura rādītājs
Pievienoties aprakstam
Apvieno vairākas apakšvirknes vienā virknē.
Vienkārši pievienošanās piemēri
123456789 | Sub Join_Example ()Dim strFullName kā virkneDim arrName (no 0 līdz 2) kā virknearrName (0) = "Maikls"arrName (1) = "Paulings"strFullName = Pievienoties (arrName)MsgBox strFullNameBeigu apakš |
Tas tiks parādīts šādi.
Pievienojieties sintaksei
VBA redaktorā varat ierakstīt “Join (”), lai skatītu pievienošanās funkcijas sintaksi:
Funkcija Savienot satur 2 argumentus:
Avota masīvs: 1d masīvs, kas satur apakšvirknes, kuras jāapvieno.
Atdalītājs: [Neobligāti] Atdalītājs. Ja tas tiek izlaists, tiek izmantota atstarpes zīme ("").
Excel VBA pievienošanās funkcijas piemēri
12345678 | Sub JoinArray_Example1 ()Dim strFullPath kā virkneDim arrPath (no 0 līdz 2) kā virknearrPath (0) = "C:"arrPath (1) = "Lietotāji"arrPath (2) = "Publisks"strFullPath = Pievienoties (arrPath, "\")Beigu apakš |
Rezultāts: C: \ Users \ Public
123 | Sub JoinArray_Example2 ()MsgBox Join (Array ("A", "B", "C"), ",")Beigu apakš |
Rezultāts: “A, B, C”