Domanda agli scripter

[Marco-elle]

Buonasera a tutti,
vorrei sapere se esiste un codice o qualche stratagemma per inserire il numero esatto di una divisione.La mia impressione è che quando dopo la virgola il numero è superiore a 5,mi inserisce nel resoconto il numero successivo.Mi spiego meglio;
1280/88=14,5454545
però in previsione esce il 15
grazie a chi vorrà aiutarmi

 

[Mike58]

Ciao Marco con la funzione Int (Numero) riporta il numero intero.
Quindi se il decimale (dopo la virgola) è inferiore a 15,50 riporta il 14 se superiore a 15,59 riporta 15.
Altrimenti se vuoi il numero decimale usa la funzione Round(numero,larghezza).

Comunque vedi esempi vari

Sub Main
   a  =  1280/88
   Scrivi a ' divisione intera
   Scrivi Int(a),1 ' divisione intera
   Scrivi Round(a,2)'divisione con 2 decimali
   Scrivi Round(a,0),1 ' divisione con zero decimali
   Scrivi Left(a,2) ' scrive primi 2 numeri a sinistra
   '.......... oppure .............
   b = Int(1280/88)
   Scrivi b,1,,,1,3
'.....................oppure .............
c = cint(1280/88)
scrivi c


End Sub

 

[Marco-elle]

Grazie Mike.....sei un FIGO!