Telefonino.net network
 
| HOMEPAGE | INDICE FORUM | REGOLAMENTO | ::. NEI PREFERITI .:: | RSS Forum | RSS News | NEWS web | NEWS software |
| PUBBLICITA' | | ARTICOLI | WIN XP | VISTA | WIN 7 | REGISTRI | SOFTWARE | MANUALI | RECENSIONI | LINUX | HUMOR | HARDWARE | DOWNLOAD | | CERCA nel FORUM » |

Torna indietro   WinTricks Forum > Software > Programmazione

Notices

Rispondi
 
Strumenti discussione
Vecchio 03-07-2009, 14.28.31   #1
Jamester
Junior Member
 
Registrato: 08-04-2008
Messaggi: 72
Jamester promette bene
[VB6] Arrotondamento Condizionale

Buongiorno a tutti. Quest'oggi ho un altro enigma da risolvere che spero di riuscire a spiegare bene xche è una cosa un po' anomala. Dunque: abbiamo un text1 che contiene un numero e 11 pulsanti sui quali vengono scritti dei risultati di calcoli del tipo

Quota:
Command2.Caption = Int(Text1 * 70 / 100)
Fin qui tutto apposto (PARE). Ora cosa mi serve a me? facendo un esempio se nel text1 scrivo 1 il calcolo sarebbe 1*70/100 = 0.7 e quindi con il codice elimina la parte decimale riportando 0. Ora se io vado a scrivere altri numeri, mi accorgo che alcune volte i numeri che dovrebbero uscire vengono invece arrotondati secondo uno strano criterio del tipo se la parte decimale e' 0.6 0.7 o nn so esattamente quando lo arrotonda.

Ora la mia domanda e' questa: avendo la riga precedente, posso io dire al comando di arrotondare il numero e nn eseguire l'istruzione INT nel caso in cui la PARTE DECIMALE ammonti a un numero X (per comodita' mettiamo che la parte decimale sia tipo 0.7 o maggiore di) ? Se si, quale sarebbe il codice?
Jamester non è collegato   Rispondi citando
Vecchio 03-07-2009, 14.48.05   #2
LoryOne
Gold Member
WT Expert
 
Registrato: 09-01-2002
Loc.: None of your business
Messaggi: 5.505
LoryOne è un gioiello raroLoryOne è un gioiello raroLoryOne è un gioiello raro
Int e Fix non sono la stessa cosa.
Prova.
LoryOne non è collegato   Rispondi citando
Vecchio 03-07-2009, 14.54.11   #3
miciomao
Hero Member
 
L'avatar di miciomao
 
Registrato: 14-01-2005
Loc.: Rome, Italy
Messaggi: 1.132
miciomao promette bene
Ciao

Round dovrebbe fare al caso tuo

quindi

Command2.Caption = Int(Round(Text1 * 70 / 100, 0))



Ciao
Alex
___________________________________

♫ m u s i c ♪ i s ♫ t h e ♪ a n s w e r ♫
"Il più piccolo dei piccoli felini è già lui stesso un vero capolavoro". (Leonardo da Vinci)
Namasté!
miciomao non è collegato   Rispondi citando
Vecchio 03-07-2009, 15.00.31   #4
miciomao
Hero Member
 
L'avatar di miciomao
 
Registrato: 14-01-2005
Loc.: Rome, Italy
Messaggi: 1.132
miciomao promette bene
forse dopo la virgola dovrai inserire 1 anzichè 0 nel tuo caso
___________________________________

♫ m u s i c ♪ i s ♫ t h e ♪ a n s w e r ♫
"Il più piccolo dei piccoli felini è già lui stesso un vero capolavoro". (Leonardo da Vinci)
Namasté!
miciomao non è collegato   Rispondi citando
Vecchio 04-07-2009, 15.33.07   #5
LoryOne
Gold Member
WT Expert
 
Registrato: 09-01-2002
Loc.: None of your business
Messaggi: 5.505
LoryOne è un gioiello raroLoryOne è un gioiello raroLoryOne è un gioiello raro

Codice:
Command2.Caption = Int(Text1 * 70 / 100)
Orrore, raccapricco, fucilazione immediata
Text1 * 70
così è meglio: Val(Text1)*70
LoryOne non è collegato   Rispondi citando
Rispondi


Utenti attualmente attivi che stanno leggendo questa discussione: 1 (0 utenti e 1 ospiti)
 
Strumenti discussione

Regole di scrittura
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is ON
Gli smilies sono ON
[IMG] è ON
Il codice HTML è OFF

Vai al forum

Discussioni simili
Discussione Autore discussione Forum Risposte Ultimo messaggio
Formattazione condizionale scompare in Excel 2007 ghisirds Office suite 0 17-09-2007 23.26.23
Formattazione condizionale con Access xp gianca54 Office suite 3 07-03-2007 20.17.40
Excel 2003 - Arrotondamento per difetto sisko81 Office suite 14 14-11-2006 10.33.13
Formattazione condizionale LucaSeil Office suite 10 19-09-2005 18.44.58
[VB6] Chiudo la mia applicazzione e poi si riapre da sola! Longhorn Programmazione 9 18-09-2005 11.16.55

Orario GMT +2. Ora sono le: 13.14.18.


E' vietata la riproduzione, anche solo in parte, di contenuti e grafica.
Copyright © 1999-2017 Edizioni Master S.p.A. p.iva: 02105820787 • Tutti i diritti sono riservati
L'editore NON si assume nessuna responsabilità dei contenuti pubblicati sul forum in quanto redatti direttamente dagli utenti.
Questi ultimi sono responsabili dei contenuti da loro riportati nelle discussioni del forum
Powered by vBulletin - 2010 Copyright © Jelsoft Enterprises Limited.