'宣言
 
Public Shared Function ConvertUnits( _
   ByVal  As System.Double, _
   ByVal  As UnitTypeEnum, _
   ByVal  As UnitTypeEnum, _
   ByVal  As System.Single, _
   ByVal  As System.Single _
) As System.Double
             
        
            
            '使用法
 
Dim value As System.Double
Dim from As UnitTypeEnum
Dim to As UnitTypeEnum
Dim fromDpi As System.Single
Dim toDpi As System.Single
Dim value As System.Double
 
value = Utils.ConvertUnits(value, from, to, fromDpi, toDpi)
             
        
            
            public static System.double ConvertUnits( 
   System.double ,
   UnitTypeEnum ,
   UnitTypeEnum ,
   System.float ,
   System.float 
)