Probleme mit Division Verfasst am: 28.09.2009, 16:44
Also ich habe ein kleines problem bezüglich der division. Und zwar möchte ich die Durchschnittsgröße der dateien in einem Ordner in einem Label anzeigen lassen. Das wollte ich aber eigentlich so machen, aber die "Funktion" gibt nur die Gesamtgrößße der dateien zusammen aus.
Visual Basic: [code] dim sizeofthem as integer dim average as integer sizeofthem = sizeofthem + FileLen(folder1 & dateien(I).Dateiname) xpLabel3.Caption = "Size of all Files: " & sizeofthem & " Bytes" average = CDbl(sizeofthem) CDbl(UBound(dateien)) xpLabel4.Caption = "Average: " & average & " Bytes" [/code]
Ich hoffe es kann mir jemand helfen. _________________