Převod String na Single pomocí Pm.ToNumber

[Kalousek]

Dobrý den, snažím se převést řetězec String (je v něm pouze číslo ve tvaru: 3.14) na datový typ Single. Používám skript viz níže. Nevím proč metoda Pm.CSng funguje, ale metoda zapsaná úplně stejně pouze s využitím Pm.ToNumber vrací chybu: Cannot convert value.

Dim v1,v2

v1 = Pm.ToNumber(pMe.Pm("../Data1/#vars/d1"))
v2 = Pm.CSng(pMe.Pm("../Data1/#vars/d1"))

pMe.Pm("../Data/#vars/d0") = v1 'zde se zobrazí pouze 0
pMe.Pm("../Data/#vars/d1") = v2 'tady funguje vše a dostanu 3.14

[Pavel Klimíček]

Dobrý den.

Správný zápis je takový, který jasně určí kterou vlastnost objektu chceme číst a do jaké vlastnosti chceme zapisovat.

Code: Select all

Dim v1,v2

v1 = Pm.ToNumber(pMe.Pm("../Data1/#vars/d1").Value)
v2 = Pm.CSng(pMe.Pm("../Data1/#vars/d1").Value)

pMe.Pm("../Data/#vars/d0").Value = v1
pMe.Pm("../Data/#vars/d1").Value = v2