valuta- komma el. punktum

hmmm.... nogen der ved hvordan man gør i andre sprog så????

Davs koldstar,
jeg har lavet en lille kodestump til at tjekke om det bruges dansk eller engelsk komma-sætning, specielt til dig :P. Koden er som følger:

Public Sub TjekKomma()

    Dim KommaTest As Single, T As String
    KommaTest = 0.5
   
    'Tjekker om der står "," eller "."
    If InStr(KommaTest, ",") Then
        T = " For at få programmet til at regne rigtigt, bør du " & vbNewLine & _
        " vælge International og Tal i Windows Kontrol- " & vbNewLine & _
        " panelet og indstille: " & vbNewLine & vbNewLine & _
        " 1) Decimaltegn til . (i stedet for komma)." & vbNewLine & _
        " 2) 1000-talsseperator til , (i stedet for punktum)." & vbNewLine & _
        " 3) Listeseperator til . (i stedet for semikolon)." & vbNewLine & vbNewLine & _
        " Vil du foretage disse ændringer nu? " & vbNewLine
       
        If MsgBox(T, vbYesNo + vbExclamation) = vbYes Then
            Shell "control.exe", 3 'kontrolpanel
        End If
    End If
   
End Sub

Skriv hvis du er i tvivl om noget...
-Sion

det ser godt. ud... jeg har ikek mulighed for at afprøve det lige nu, men det er vist det her jeg har brug for.. tak

I delphi kan man sætte en eller anden formatterings variabel (3 år siden ... tænke ... tænke ...) der definerer dette.... Kan ikke huske hvad den hed. Den bevirkede at tal/valuta/dato blev behanldet efter variablens indstilling.



JP