Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - Isolare
Forum - Visual Basic 6 - Isolare

Pagine: [ 1 2 3 ] Precedente | Prossimo
Avatar
j7-na (Normal User)
Rookie


Messaggi: 45
Iscritto: 20/10/2011

Segnala al moderatore
Postato alle 10:22
Sabato, 12/11/2011
Salve ragazzi,
leggendo sul forum ho notato come si isola la parte intera di un numero, cioè:

Codice sorgente - presumibilmente Plain Text
  1. Text1.Text=Fix(numero)



In questo modo funziona perfettamente. Se invece io voglio eliminare il primo numero intero e i decimali, quale funzione devo scrivere?

In pratica se il risultato è:

5003,13

Voglio che visualizzi:

5000

PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 10:47
Sabato, 12/11/2011
Usa la matematica modulare.

PM Quote
Avatar
j7-na (Normal User)
Rookie


Messaggi: 45
Iscritto: 20/10/2011

Segnala al moderatore
Postato alle 11:12
Sabato, 12/11/2011
In che modo?

Se scrivo così:

Codice sorgente - presumibilmente Plain Text
  1. Text1.Text=Fix(numero)


Input:  5003,13
Output:  5003

Invece dovrei restituire 5000. L'ultima parte(3,13) dovrei visualizzarla in un altra Text. Come risolvere? :k:

Ultima modifica effettuata da j7-na il 12/11/2011 alle 11:15
PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 11:20
Sabato, 12/11/2011
Calcola la parte intera della divisione tra il numero e 10.
Quindi moltiplica il quoziente per 10.

PM Quote
Avatar
j7-na (Normal User)
Rookie


Messaggi: 45
Iscritto: 20/10/2011

Segnala al moderatore
Postato alle 11:28
Sabato, 12/11/2011
Cioè dovrei fare i calcoli su 5003 o 3? Non ho capito! Sorry! ;)

PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 12:02
Sabato, 12/11/2011
Devi fare i calcoli su numero.

Esempio:
Codice sorgente - presumibilmente VB.NET
  1. dim q as double
  2.  dim modulo as double
  3.  modulo=10
  4.  q=FIX(numero/modulo) // calcolo la parte intera di numero/modulo
  5.  numero=q*modulo

PM Quote
Avatar
j7-na (Normal User)
Rookie


Messaggi: 45
Iscritto: 20/10/2011

Segnala al moderatore
Postato alle 12:32
Sabato, 12/11/2011
Ok. Ora ho capito. Impostando la variabile modulo=10, dopo calcolo la parte intera con il modulo(la divisione) e poi gli applico la funzione FIX. Infine lo moltiplico per il quoziente. Ma anke così è giusto:

Text8.Text = Int(numero)


Oppure non si usa?


Poi se voglio invece voglio l'ultimo numero intero e i decimale...c'è una funzione da applicare? Vero?


Ultima modifica effettuata da j7-na il 12/11/2011 alle 12:41
PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 14:50
Sabato, 12/11/2011
Testo quotato
Postato originariamente da j7-na:
Ma anke così è giusto:

Text8.Text = Int(numero)


Puoi scrivere direttamente
Codice sorgente - presumibilmente Plain Text
  1. Text1.Text=q*modulo


Testo quotato
Poi se voglio invece voglio l'ultimo numero intero e i decimale...c'è una funzione da applicare? Vero?


Intendi il resto?
Per quello, lo ricavi per sottrazione.

PM Quote
Avatar
j7-na (Normal User)
Rookie


Messaggi: 45
Iscritto: 20/10/2011

Segnala al moderatore
Postato alle 15:17
Sabato, 12/11/2011
Intendo questo, cioè:

Input:  101,13

1° Output:  100
2° Output:     1,13



Ecco cosa devo ottenere! :asd:

Ultima modifica effettuata da j7-na il 12/11/2011 alle 15:36
PM Quote
Pagine: [ 1 2 3 ] Precedente | Prossimo