bitte!!!
13.11.2003 01:09:23
so spaet
Public
Function performance(wert() As Single) As Single
performance = 1
For a = LBound(werte) To UBound(werte)
performance = (1 + werte(a)) * rette
Next a
End Function
DANKE
gute nacht
Anzeige