[VB6] Formattare i numeri decimali

OrcaAssassina · 24-09-2006, 00:46

Ho un calcolo:

Text93.Text = (Text95.Text / (1.0278 - (0.0278 * Text94.Text))

Il risultato vorrei che mi venga reisituito con una sola cifra decimale

Cosi scrivendo:

Text93.Text = Format((Text95.Text / (1.0278 - (0.0278 * Text94.Text))), 0)

mi da il numero intero sena virgola

Come va modificato????

Ciao e grazieeeeee

mynos79 · 24-09-2006, 08:31

Va modificato così:

Text93.Text = Format((Text95.Text / (1.0278 - (0.0278 * Text94.Text))), "#.0")

Se ad esempio vuoi formattare col separatore di migliaia e con 2 cifre decimali puoi fare così:

Format(....., "##,##0.00")

Comunque il formato personalizzato non è univoco, è abbastanza elastico ... infatti quello che serve a te può essere "#.0" come anche "####0.0" ... da lo stesso risultato (senza separatore delle migliaia, se lo vuoi devi specificarlo).
La funzione Format poi, se la usi senza il parametro formato (ovvero con solo l' espressione) è come la funzione Str ... converte in stringa e basta ...

mynos79 · 24-09-2006, 08:32

Ah, altra cosa ... facendo così tu tagli il risultato alla 1° cifra decimale ... ma non arrotondi ... se vuoi arrotondare sai che devi usare altre funzioni prima o assieme del format.

24-09-2006, 00:46	#1
OrcaAssassina Senior Member Iscritto dal: Feb 2003 Messaggi: 2818	[VB6] Formattare i numeri decimali Ho un calcolo: Text93.Text = (Text95.Text / (1.0278 - (0.0278 * Text94.Text)) Il risultato vorrei che mi venga reisituito con una sola cifra decimale Cosi scrivendo: Text93.Text = Format((Text95.Text / (1.0278 - (0.0278 * Text94.Text))), 0) mi da il numero intero sena virgola Come va modificato???? Ciao e grazieeeeee __________________ AMD 3700x --- ASUS X570 CROSSHEAR VIII HERO --- 4x 8GB Corsair Vengeance RGB PRO 3600 MHz --- SSD: Samsung 980Pro 1TBb --- EVGA RTX 2070 SUPER

24-09-2006, 08:31	#2
mynos79 Senior Member Iscritto dal: Jun 2005 Città: Mestre (VE) Messaggi: 1415	Va modificato così: Text93.Text = Format((Text95.Text / (1.0278 - (0.0278 * Text94.Text))), "#.0") Se ad esempio vuoi formattare col separatore di migliaia e con 2 cifre decimali puoi fare così: Format(....., "##,##0.00") Comunque il formato personalizzato non è univoco, è abbastanza elastico ... infatti quello che serve a te può essere "#.0" come anche "####0.0" ... da lo stesso risultato (senza separatore delle migliaia, se lo vuoi devi specificarlo). La funzione Format poi, se la usi senza il parametro formato (ovvero con solo l' espressione) è come la funzione Str ... converte in stringa e basta ... __________________ IN WIN 909 / AMD Ryzen 9 3950X / Gigabyte X570 Aorus Xtreme / 4x8gb G.Skill 3200 / Gigabyte Aorus RTX2080Ti Xterme / 2x Gigabyte Aorus NVMe M.2 1Tb / Corsair AX1200i / full liquid EK - Bitspower / circa 160 trattative nel mercatino

24-09-2006, 08:32	#3
mynos79 Senior Member Iscritto dal: Jun 2005 Città: Mestre (VE) Messaggi: 1415	Ah, altra cosa ... facendo così tu tagli il risultato alla 1° cifra decimale ... ma non arrotondi ... se vuoi arrotondare sai che devi usare altre funzioni prima o assieme del format. __________________ IN WIN 909 / AMD Ryzen 9 3950X / Gigabyte X570 Aorus Xtreme / 4x8gb G.Skill 3200 / Gigabyte Aorus RTX2080Ti Xterme / 2x Gigabyte Aorus NVMe M.2 1Tb / Corsair AX1200i / full liquid EK - Bitspower / circa 160 trattative nel mercatino

Strumenti
Mostra una versione stampabile Invia questa pagina per email