Avatar billede nlunn Nybegynder
19. august 1999 - 12:59 Der er 7 kommentarer og
2 løsninger

Afrunding af tal

Jeg ved at man kan afrunde tal v.h.a. formatNumber og round, men er det muligt at afrunde f.eks. 553 til 600
eller 21 til 20?
Avatar billede sone Nybegynder
19. august 1999 - 13:34 #1
Man kan jo lave noget helt gerenelt a'la

  tal = 553
  faktor = 10^(len(tal)-1)
  Response.Write "TEST variabel: " & Round(tal/faktor)*faktor

Man kan jo også bare sætte faktor til 100 eller 10 - alt efter hvilket resultet man vil have.
Avatar billede sone Nybegynder
19. august 1999 - 13:34 #2
Det skulle jo ha' været et svar...
Avatar billede nlunn Nybegynder
19. august 1999 - 13:40 #3
Jeg ved godt at man kan gøre det på den måde - eller hvis man vil bruge et vilkårligt tal:

afrundetTal= round(tal/10^(len(tal)-1))*10^(len(tal)-1)

Men det er den lange måde - er der en kort måde?
Hvis der ikke kommer andre løsninger i dag, så får du bare point´ne
Avatar billede sone Nybegynder
19. august 1999 - 13:45 #4
Det tror jeg ikke der er...
Avatar billede moses Praktikant
19. august 1999 - 13:45 #5
Det gøres sådan:

Public Function Afrund(X As Single)
    Dim TempSign As Integer
   
    TempSign = Sgn(X)
    X = Abs(X)
    'Afrund = TempSign * (-Int(-X / 100) * 100) 'Runder op til nærmeste hundrede
    'Afrund = TempSign * (Int(X / 10) * 10) 'Runder ned til nærmeste tiere
End Function
Avatar billede moses Praktikant
19. august 1999 - 13:50 #6
Du havde jo selv svaret !!!

Der er ikke nogen kortere måde - end den lange, hvis du vil have en funktion for vilkårlige tal - kun, hvis du altid har bestemte talstørrelser.

Avatar billede moses Praktikant
19. august 1999 - 13:51 #7
Bemærk lige, at round ikke både kan runde op og ned !!!
Avatar billede nlunn Nybegynder
25. august 1999 - 11:48 #8
moses - Det passer ikke - "round" runder fint op og ned
Avatar billede moses Praktikant
25. august 1999 - 11:55 #9
Du har fuldstændig ret - du skal hænges !!!
Det var en tanketorsk fra min side !!
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester