Aiuto per risultato somme

[siriano]

Ho una somma da dividere per 3
è ovvio che se per es. la somma fosse 104 diviso 3 darebbe come risultato 34,66
ho bisogno che lo script mi scriva, o mi consideri, solo i risultati senza decimali,
cioè solo numeri interi, è possibile farlo?
Grazie, saluti a tutti

 

[salvo50]

Ho una somma da dividere per 3
è ovvio che se per es. la somma fosse 104 diviso 3 darebbe come risultato 34,66
ho bisogno che lo script mi scriva, o mi consideri, solo i risultati senza decimali,
cioè solo numeri interi, è possibile farlo?
Grazie, saluti a tutti

Ciao Siriano

Ci sono 3 operatori aritmetici per fare le divisioni

1)Mod - che restituisce nel quoziente solo il resto
2) / - che restituisce nel quoziente il numero intero più la parte decimale
3) \ - che restituisce nel quoziente solo la parte intera

queste istruzioni li trovi negli aiuti, si apre un menù a tendina, clicca su - lezioni di scripting

Option Explicit
Sub Main
   Dim A,B,C,D
   A = 2756
   B = 2756 / 3
   C = 2756 \ 3
   D =(A Mod 3)
   Scrivi B
   Scrivi C
   Scrivi D
End Sub

 

[Mike58]

prova anche cosi

Option Explicit
Sub Main
   Dim A,B,C,D,E,F,G
   A = 104
   B = 104 / 3
   C = 104 \ 3
   D =(A Mod 3)
   '----------------------------
   E = Int(A/3)'intero
   F = Round(A/3,0)'arrotanda , decimali
   G = Round(A/3,2)' arrotonda , 2 decimali
   '----------------------------
   Scrivi B
   Scrivi C
   Scrivi D
   Scrivi
   Scrivi E,1
   Scrivi F,1
   Scrivi G,1
End Sub

 

[salvo50]

Ciao Mike

Grazie, molto istruttivo