vbscripts 型が一致しません

dts activexスクリプト
decimal同士の変数を加算しようとしたが
「型が一致しません」エラーがでる
とりあえず
if isnull(変数) then
xxxx=0
else
xxxx=変数
end if
yyyy=cdbl(xxxx)
としてエラーをでなくした