Visual Basic 6 - Visualizzare la parte decimale

Buon giorno,
dovrei visualizzare la parte decimale di un numero; cioè di 13,3 devo visualizzare nella mia txtRisulato.Text = 0,3.

Grazie in anticipo!

Ciao!
Prova a fare in questo modo

dim numero as double
dim decimale as double
numero=13.3
decimale=abs(numero)-int(abs(numero))
txtRisulato.Text = decimale

Ecco:

Private Sub Command1_Click()
    Dim numero As Double
    Dim decimale As Double
    numero = Text1.Text
    decimale = Abs(numero) - Int(Abs(numero))
   
txtRisultato.Text =decimale
End Sub

Se inserisco 13,3 visualizzo:

0,300000000000001


C'è il periodico!

Qui vai di fantasia

Ad esempio potresti fare così:

Dim Num As Double
Num = 13,3
txtRisulato.Text = Num -  Fix(Num)

msdn.microsoft.com/it-it/library/…


Oppure, avendo il numero delle cifre decimali costante e detto k, fare una cosa del genere:

txtRisulato.Text = Num * (k*10)

E per finire, anche se è la soluzione che meno mi piace, potresti lavorare direttamente sulle stringhe formattate con Format (per forzare l'uso della virgola o del punto in modo da evitare problemi con la cultura usata) con funzioni quali Mid$ o Split.

EDIT:
ah, mi hanno preceduto

Scrivi

txtRisultato.Text = Format(decimale, "0.#"

Ho seguito il consiglio di "nessuno"! Grazie mille!