Gennemsnit af tal

Lav dit design om så du ikke gemmer % tegnet. Det er en ualmindelig dum idé.

Ellers hent hele møget ud, løb det igennem en løkke, hvor du fjerner % tegnet, og udregner gennemsnittet.

Første løsning er den rigtige. Sidste løsning er noget hø.

hvis du bruger JavaScript, skriver du bare

parseInt("75%"); // ... eller en variabel i stedet for strengen

i VBScript skriver du

CInt("75%")

i stedet. Gennemsnittet fås jo ved at lægge alle tallene sammen og dividere med antallet af tal.

sProcent = "70%"
iTal = Int(Left(sProcent, Len(sProcent)-1))

Int, tager og laver variablen om til typen integer (tal)
Left, tager x antal tegn fra venstre i variablen
Len, tæller hvor mange tegn variablen har

- Michael

mercur8 : du har ret i at det er smartere, men når løsningen allerede er lavet med %-tegn, vil det være hurtigere bare at trække det ud - og der kræves jo ingen stor funktion for det.

minijensen ->

Dvs. jeg bare kan lave min kode sådan her:
pro = "0"

do while not rs.eof

sProcent = " & procent & "
iTal = Int(Left(sProcent, Len(sProcent)-1))

pro = pro+iTal

rs.movenext
loop

eller gør jeg noget forkert?

Det er noget fusk. Så skal han pludesligt bruge de data til noget andet, et andet sted også, og så skal han også der lave fusk. Og så bliver det fusk på fusk. Og til sidst er det bestemt ikke hurtigere at rette noget som helst.

Så lav det om.

mercur8 -> hvis du ikke kan svare på mit spørgsmål så lad venligst vær med at indlægge nogle indlæg. Koden er lavet sådan og sådan bliver den.

Med venlig hilsen
Wulff.JJ

Jeg svarer på dit spørgsmål. Men åbenbart ikke et svar du kan lide.

mercur8 : det kaldes workarounds. mange store programmører bruger masser af det, og det er bl.a. grunden til at de fleste programmer først bliver ordentlige i version 2, da man så redesigner hele skidtet.

du har klart ret i at det vil være mest effektivt at lave systemet om, men det er ikke noget stort workaround, og problemerne vil ikke være store.


minijensen1 & zetn :  Hvorfor al det kode? min løsning er meget hurtigere - både at skrive og udføre.

viperine: Vrøvl.

Viperine kan du ikke prøve at skrive den kode der skal bruges, er ikke den bedste til det. Forstår ikek rigtig din kode nemlig.

for at tage minijensen1's eksempel:

sProcent = "70%"
iTal = Int(Left(sProcent, Len(sProcent)-1))

laves om til

sProcent = "70%"
iTal = CInt(sProcent)

husk at bruge CSng i stedet hvis der kan være decimaler i din procent.

Oki, men er resten af min kode i orden så`?

Heysa, her er min kode (helst ingen kommentarer om hvorfor det er lavet sådan, se bort fra det)

pro = "0"

do while not rs5.eof
if rs5("status") = "Afsluttet" then
sProcent = "100%"
iTal = CInt(sProcent)
else
sProcent = rs("status")
iTal = CInt(sProcent)
end if

pro = "" & pro & "+" & iTal & ""

rs5.movenext
loop

Jeg får bare udtrækket 0....

Kan I hjælpe?

Nogen der kan hjælpe?