Domino 9 und frühere Versionen > Entwicklung

Liste erzeugen ??????? In LS

<< < (2/2)

ZaLudtske:
Hallo,

hier eine kleine Funktion als Splitersatz unter R5.


--- Code: ---Public Function fktSplit(Byval strAusdruck As String, Byval strTrennz As String) As Variant
  Dim strCmd As String

  Dim vntReturn As Variant

  strCmd = "@EXPLODE(" + Chr(34) + strAusdruck + Chr(34) + "; " + Chr(34) + strTrennz + Chr(34) +");"

  vntReturn = Evaluate(strCmd)

  fktSplit = vntReturn

End Function
--- Ende Code ---

Navigation

[0] Themen-Index

[*] Vorherige Sete