✔ vordefinierte Parameter in Funktionen nutzen?

[mahon]

ich würde gerne vordefinierte Parameter in meiner Funktion anbieten.

Beispiel:
Dim a = Split("hallo", "l", CompareMethod.Binary)

Hier wird einmal CompareMethod.Text oder CompareMethod.Binary angeboten!


Wie würde die Funktions Deklaration dafür aussehen?
function split(byval text as string,byval seperator as string, xxxxxxx ) as array ?

mfg
Mahon

 

[wincnc]

Hallo

Hier ein kleines Beispiel:

Private Enum CompareMethod
  BinaryCompare = 0
  DatabaseCompare = 1
  TextCompare = 2
End Enum

Private Sub Command1_Click()
Dim a() As String

  a = DeinSplit("Das ist ein Test", " ", BinaryCompare)
End Sub

Private Function DeinSplit(ByVal Expression As String, ByVal Delimiter As String, ByVal Compare As CompareMethod)
  ' .....
End Function

 

[mahon]

Danke das wars auch schon........

mfg
Mahon