This shows you the differences between two versions of the page.
Both sides previous revision Previous revision Next revision | Previous revision | ||
vba:functions:concat_ws [08.05.2014 10:31:44] yaslaw [Code] |
vba:functions:concat_ws [31.01.2017 11:47:05] (current) yaslaw [Parameters] |
||
---|---|---|---|
Line 1: | Line 1: | ||
+ | <const> | ||
+ | version=1.0.0 | ||
+ | vdate=27.02.2014 | ||
+ | fname=udf_concatws.bas | ||
+ | ns=%NAMESPACE% | ||
+ | fpath=/vba/functions | ||
+ | </const> | ||
====== [VBA] concat_ws() ====== | ====== [VBA] concat_ws() ====== | ||
- | Diese Funktion verbindet Mehrere Elemente zu einem String. Das Trennzeichen kann mitgegeben werden. | + | //Diese Funktion verbindet Mehrere Elemente zu einem String. Das Trennzeichen kann mitgegeben werden. |
Sie ist sehr gut in SQL geeignet um aus mehreren Feldern ein Key zu erstellen | Sie ist sehr gut in SQL geeignet um aus mehreren Feldern ein Key zu erstellen | ||
+ | // | ||
+ | ==Version %%version%% - %%vdate%%== | ||
+ | |||
+ | {{%%fname%%|Download %%fname%% (V-%%version%%)}} | ||
+ | |||
+ | |||
===== Definition ===== | ===== Definition ===== | ||
Line 9: | Line 22: | ||
) As String</code> | ) As String</code> | ||
==== Parameters ==== | ==== Parameters ==== | ||
- | ***iDelemiter** Das Trennzeichen/String, der ziesch die einzelnen Elemente gesetzt wird | + | ***iDelemiter** Das Trennzeichen/String, der zwischen die einzelnen Elemente gesetzt wird |
- | ***ParamArray** Die einzelnen Elemente | + | ***%%ParamArray%%** Die einzelnen Elemente |
==== Return ==== | ==== Return ==== | ||
Es wird ein String zurückgegeben | Es wird ein String zurückgegeben | ||
Line 28: | Line 41: | ||
===== Code ===== | ===== Code ===== | ||
- | <code vb _concat_ws.bas> | + | <source '%%fpath%%/%%fname%%' vb> |
- | '/** | + | |
- | ' * Fügt mehrere Elemente mit einem Trennstring zu einem String zusammen | + | |
- | ' * @param Variant Delemiter | + | |
- | ' * @param ParamArray Die verschiedenen Elemente | + | |
- | ' * @return String | + | |
- | ' */ | + | |
- | Public Function concat_ws( _ | + | |
- | ByVal iDelemiter As Variant, _ | + | |
- | ParamArray items() As Variant _ | + | |
- | ) As String | + | |
- | concat_ws = Join(items, CStr(iDelemiter)) | + | |
- | End Function | + | |
- | </code> | + | |