ExtentionsToDouble 方法

Public Shared Function ToDouble ( 
	d As Object
) As Double

Dim d As Object

Dim returnValue As Double

returnValue = Extentions.ToDouble(d)