CloseForced Example for VB.NET

'LEADDICOMNet1 is a predefined LEADDicomNet object
Private Sub TestCloseForced()
   LEADDICOMNet1.NetworkSecurityMode = LTDNCLib.DicomSecurityModes.DICOM_SECURE_ISCL
   LEADDICOMNet1.StartUp()
   ' do some communications
   LEADDICOMNet1.CloseForced(LEADDICOMNet1.hNet, True)
End Sub