SetRequest Example for VB.NET
'LEADDICOMNet1 is a predefined LEADDicomNet object
Private Sub TestSetRequest ( )
'set associate as Accept
If (LEADDICOMNet1.hPDU <> 0) Then
LEADDICOMNet1.SetRequest(LEADDICOMNet1.hPDU,
False)
End If
End Sub