title image


Smiley Re: An welcher Index steht etwas in einem Array? Arrayindex
Hi,



wenn du nicht gerade auf Date verharrst und diszipliniert das Array aus gleichen Strings aufbaust ist das hier das schnellste:





Private Sub Command2_Click()

Dim Dat(3) As String



Dat(0) = "01.02.04"

Dat(1) = "02.02.04"

Dat(2) = "03.02.04"



MsgBox GetIndex(Dat(), "01.02.04")

End Sub



Private Function GetIndex(ar() As String, ByVal sVal As String) As Long

GetIndex = InStr(Join(ar(), ""), sVal) \ Len(sVal)

End Function


Programmierst Du noch frei oder wirst Du schon von Microsoft verwaltet ( .NET)?



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: