Public Shared Function CalculateDpi( _
   ByVal height As Integer, _
   ByVal width As Integer, _
   ByVal printHeight As Integer, _
   ByVal printWidth As Integer _
) As Integer

Dim height As Integer
Dim width As Integer
Dim printHeight As Integer
Dim printWidth As Integer
Dim value As Integer
 
value = ImageDescriptor.CalculateDpi(height, width, printHeight, printWidth)

public static int CalculateDpi( 
   int height,
   int width,
   int printHeight,
   int printWidth
)