allgemeine Laufvariable für While-Schleife?
29.08.2005 14:04:35
Riceman
ich habe eine klasse clsAnalysis mit einem dynamischen array. das hinzufügen eines strings zu diesem array funzt schon. allerdings ist das auslesen noch nicht so ganz wie von mir gewünscht. es soll mit einer konstruktion
While Analysis.getLogfiles() ""
'Tu etwas mit dem aktuellen Element
Wend
ausgelesen werden. hier der code von getLogfiles():
Public
Function GetLogfiles() As String
myI = myI + 1
If myI <= UBound(myLogfiles) Then
myCurrLogfile = myLogfiles(myI) 'das hier ist schrott!
GetLogfiles = myLogfiles(myI)
Else
GetLogfiles = ""
End If
If myI > UBound(myLogfiles) Then
myI = -1
End If
End Function
wie ihr sehen könnt, speichere ich den aktuellen wert des array-elements in einer variablen "myCurrLogfile", auf die mittels Analysis.currLogfile zugegriffen werden kann. also so:
While Analysis.getLogfiles() ""
'Tu etwas mit Analysis.currLogfile
Wend
das ist allerdings ein wüstes unprofessionelles gebastel. gibt es nicht so etwas wie eine globale laufvariable, die standardmäßig für solche schleifen verwendet wird? beispielsweise in perl gibt es so etwas:
foreach(@array) {
//Tu etwas mit $_
}
gibt es eine vergleichbare variable in vba? wenn ja, kann man sie so einfach definieren?
vielen dank für eure hilfe!
mfg
mario