'宣言 Function NumericOf( _ ByVal d_i As Object _ ) As Double
double NumericOf( object d_i )
IOperate インターフェース IOperate メンバ