' Convert from square inches to square centimeters, and vice versaFunction SquareInchesToSquareCentimeters(ByVal squareInches As Double) As Double Return squareInches * 6.4516End FunctionFunction SquareCentimetersToSquareInches(ByVal squareCentimeters As Double) As _ Double Return squareCentimeters / 6.4516End Function