Differenze tra le versioni di "Mostrare con il punto anziché con la virgola un numero in virgola mobile rappresentato in formato stringa"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
− | Se, avendo un numero in virgola mobile rappresentato da una stringa di caratteri, il simbolo separatore dei decimali è la virgola, e si intende invece ottenere invece - come separatore - il punto, si potrà fare uso delle funzioni native "Format()" e "CStr()". <SUP>[[[#Note|<B>nota 1</b>]]]</sup> | + | Se, avendo un numero in virgola mobile <U>rappresentato da una stringa di caratteri</u>, il simbolo separatore dei decimali è la virgola, e si intende invece ottenere invece - come separatore - il punto, si potrà fare uso delle funzioni native "Format()" e "CStr()". <SUP>[[[#Note|<B>nota 1</b>]]]</sup> |
Public Sub Main() | Public Sub Main() | ||
Riga 9: | Riga 9: | ||
<FONT Color=gray>' ''Quindi manipola la stringa di quel numero mediante la funzione "Format()":''</font> | <FONT Color=gray>' ''Quindi manipola la stringa di quel numero mediante la funzione "Format()":''</font> | ||
− | f = Val(<FONT Color= | + | f = Val(<FONT Color=red>Format</font>(f, "#.####")) |
<FONT Color=gray>' ''Così si ottiene ancora una rappresentazione testuale con la virgola:''</font> | <FONT Color=gray>' ''Così si ottiene ancora una rappresentazione testuale con la virgola:''</font> | ||
Riga 15: | Riga 15: | ||
<FONT Color=gray>' ''Ora finalmente si ottiene una rappresentazione testuale con il '''punto''':''</font> | <FONT Color=gray>' ''Ora finalmente si ottiene una rappresentazione testuale con il '''punto''':''</font> | ||
− | Print <FONT Color= | + | Print <FONT Color=red>CStr</font>(f) |
End | End |
Versione attuale delle 06:24, 12 gen 2025
Se, avendo un numero in virgola mobile rappresentato da una stringa di caratteri, il simbolo separatore dei decimali è la virgola, e si intende invece ottenere invece - come separatore - il punto, si potrà fare uso delle funzioni native "Format()" e "CStr()". [nota 1]
Public Sub Main() Dim f As Float Dim s As String = "12345,6789" ' Effettua il primo passaggio necessario: f = Val(s) ' Quindi manipola la stringa di quel numero mediante la funzione "Format()": f = Val(Format(f, "#.####")) ' Così si ottiene ancora una rappresentazione testuale con la virgola: Print f ' Ora finalmente si ottiene una rappresentazione testuale con il punto: Print CStr(f) End
Una seconda modalità prevede più rapidamente l'uso della funzione nativa "Replace()":
Public Sub Main() Dim s As String = "12345,6789" ' Quindi si ottiene una rappresentazione testuale con il punto: Print Replace(s, ",", ".") End
Note
[1] Vedere anche la seguente pagina: Ottenere di un numero in virgola mobile la rappresentazione del separatore con il punto anziché con la virgola