SendReleaseRequest Example for VB.NET
'LEADDICOMNet1 is a predefined LEADDicomNet object
Private Sub TestSendReleaseRequest
'set called application title
LEADDICOMNet1.SetCalled(LEADDICOMNet1.hPDU, "Called Program")
'set calling application title
LEADDICOMNet1.SetCalling(LEADDICOMNet1.hPDU,
"Calling Program")
'display the current values
MessageBox.Show(LEADDICOMNet1.GetCalled(LEADDICOMNet1.hPDU))
MessageBox.Show(LEADDICOMNet1.GetCalling(LEADDICOMNet1.hPDU))
End Sub