Hej!

Finns det någon funktion som gör om ett värde 1000000 så att det blir 1.000.000 , 1000 till 1.000 osv........
Det är ju lite snyggare att visa 1.000 kr än 1000 kr om man har en webbbutik och vill visa ett pris ;)

Hoppas ni förstod vad jag menade. Några tips?

ASP.NET är det jag använder.... VB

<CODE>
dblValue.ToString("C")
</CODE>

ja fattar inte....skulle de funka?

Parametern till ToString-metoden anger att värdet i double-variabeln ska formateras som en Currency.

inte funka!

Är du säker att du använder den rätt, för det där är rätt sätt att formattera till pengar?
Hur ser din kod ut?

Sen hur själva summan ser ut beror även på vad du har för språkinställningar (LCID).

'Så här gör jag.....
Dim intPris as Integer
'
'
'
intPris = objReader("Pris")' integer ifrån mysql
'
' nu vill jag fixa till intPris till rätt prisformatering t.ex. 1.000. HUR GÖR JAG?
'
'
'

Dim formattedPrice As String

formattedPrice = intPris.ToString("C")

Default styrs formatteringen av nationella inställningar i kontrollpanelen.
Om du vill strunta i språkinställningarna och formattera på eget sätt kan du göra så här:

<code>
Public Function ToSEK(ByVal SEK As Object) As String
Try
Dim dblSEK As Double = CDbl(SEK)
Dim nfi As Globalization.NumberFormatInfo = _
New Globalization.NumberFormatInfo

nfi.NumberGroupSeparator = "."
nfi.NumberDecimalDigits = 2
nfi.NumberDecimalSeparator = ","

Return dblSEK.ToString("N", nfi)

Catch ex As Exception
Return "0"
End Try

End Function
</code>

Med Globalization.CultureInfo kan du hämta default inställningarna för olika språk.

Ola

Snyggt!
Känner du till om motsvarande går att göra i vb6?

pelka, inte med VB6 native vad jag vet,
utan du behöver gå på Win32Api:er då..
Googla :)

Dim formattedPrice As String

formattedPrice = intPris.ToString("C")

Funkade bra men....
hur gör jag för att inte få med 2 decimaler?

Detta kan du lösa genom att använda Olas variant ovan, och sätta antalet decimaler till 0.

Annars kan du använda en egenskriven formateringssträng, t.ex.:
<CODE>
Dim formattedPrice As String

formattedPrice = intPris.ToString("###\.###\.###")
</CODE>