Visual Basic 6 - Isolare

Salve ragazzi,
leggendo sul forum ho notato come si isola la parte intera di un numero, cioè:

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

Usa la matematica modulare.

In che modo?

Se scrivo così:

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?

Calcola la parte intera della divisione tra il numero e 10.
Quindi moltiplica il quoziente per 10.

Cioè dovrei fare i calcoli su 5003 o 3? Non ho capito! Sorry!

Devi fare i calcoli su numero.

Esempio:

 dim q as double
 dim modulo as double
 modulo=10
 q=FIX(numero/modulo) // calcolo la parte intera di numero/modulo
 numero=q*modulo

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?

Puoi scrivere direttamente

Text1.Text=q*modulo

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