---

hejsa

jeg laver følgende beregning mellem nogle tekst boxe

Private Sub txtbeløb_Change()
txtsum.Text = Val(txtBeløb.Text) + samlet ' beregner beløb
End Sub

Det virker fint problemet er bare at jeg ikke kan bruge Tegnet komma som
decimal tegn altså hvis mit beløb er

49,95 skal jeg skrive 49.95 for at få det til at virke.

hvordan kan man ændre det, så tekstboxen acceptterer et komma .

---

Hej

Prøv følgende:

txtsum.Text = CDbl(txtBeløb.Text) + samlet

CDbl og de andre Cxxx funktioner bruger decimal komma som det står Windows
Settings.

- Niels G

"Jan Damkjær Dahl" <jpd@post12.tele.dk> wrote in message
news:965r6g$o01$1@news.inet.tele.dk...
> hejsa
>
> jeg laver følgende beregning mellem nogle tekst boxe
>
> Private Sub txtbeløb_Change()
> txtsum.Text = Val(txtBeløb.Text) + samlet ' beregner beløb
> End Sub
>
> Det virker fint problemet er bare at jeg ikke kan bruge Tegnet komma som
> decimal tegn altså hvis mit beløb er
>
> 49,95 skal jeg skrive 49.95 for at få det til at virke.
>
> hvordan kan man ændre det, så tekstboxen acceptterer et komma .