Public Function SECOND_IPADDRESS (ByVal ipAddress As Long) As Long
SECOND_IPADDRESS = Val("&H" & Mid(Right("00000000" & Hex(ipAddress), 8), 3, 2))
End Function
SECOND_IPADDRESS извлекает значение из 32-битного integer, которое соответствует второму полю ввода в элементе IP address control