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 17: Riga 17:
 
   Print <FONT Color=#B22222>CStr</font>(f)
 
   Print <FONT Color=#B22222>CStr</font>(f)
 
    
 
    
  '''End'''
+
  End
 
Una seconda modalità prevede più rapidamente l'uso della funzione nativa "Replace()":
 
Una seconda modalità prevede più rapidamente l'uso della funzione nativa "Replace()":
  '''Public''' Sub Main()
+
  Public Sub Main()
 
    
 
    
 
   Dim s As String = "12345,6789"
 
   Dim s As String = "12345,6789"

Versione delle 08:45, 21 dic 2023

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