Sub ExampleCountryConvert
MsgBox CDbl(1234,5678) ' 1234,5678
MsgBox CInt(1234.5678) ' 1235
MsgBox CLng(1234+5678) ' 6912
MsgBox CSng(1234,5678) ' 1234,567749023
MsgBox CDbl(expression := 5678,1234) ' 5678,1234
MsgBox CInt(expression := 5678.1234) ' 5678
MsgBox CLng(expression := 5678+1234) ' 6912
MsgBox CSng(expression := 5678,1234) ' 5678,123535156
End Sub