add number in string and textbox

Dim totNr,totStr,mynumber As String

totStr="38,8"
Msgbox(totStr,"Foutmelding",cMsgboxOK,cMsgboxHand)
mynumber=edtBoutHoogte.Text ' mynumber ="45,7"
Msgbox(mynumber,"Foutmelding",cMsgboxOK,cMsgboxHand)

' this goes wrong result=-69 instead of -6,9
totNr=totStr-mynumber
Msgbox(totNr,"Foutmelding",cMsgboxOK,cMsgboxHand)

grCor

You should use the decimal "." and not "," !
With
totStr="38.8"
mynumber ="45.7"
the result is OK.

Best regards.

thanks,

distance1 - distance = 38,8 is written into sql as 38,8
distance REAL)

so i read back 38,8

How can I write this value into sql as dot instead as a comma?

I use sql lite

gr
Cor

so, the calculation is correct only

when i write it to an sql field which has real as field type

it is written as comma, instead of dot

gr

Cor

Cor said:

it is written as comma, instead of dot

Click to expand...

This is known as Basic4PPC's locale problem. You could try the special "locale" library per this forum entry.

Mike.

Here is your example using locale.library to convert the numbers to the correct format. This should work with all languages. num is a locale.library Numeric object.

Cor said:

so, the calculation is correct only

when i write it to an sql field which has real as field type

it is written as comma, instead of dot

Click to expand...

If it is possible you shouldn't use REAL as data type in sqlite. There is no advantage in doing so as all columns are internally created as strings so use datatype TEXT. The problem with B4PPC is that if you select a number from a REAL column, you will get it in localized form and you have to convert it to the correct form for yourself.

thanks

I do now when I read from SQL 4,7

just replace the , with .

s=4,7

s = StrReplace (s,","."")

before doing the calculation

so i don't need the locale lib

grCor