Version Example for Visual Basic

    'check the Associate Class version
    MsgBox "Version: " & CStr(LEADDICOMNet1.GetVersion (LEADDICOMNet1.hPDU))
    'set the version
    LEADDICOMNet1.SetVersion LEADDICOMNet1.hPDU, 99
    MsgBox "Version: " & CStr(LEADDICOMNet1.GetVersion (LEADDICOMNet1.hPDU))