NetReceiveUnknown Example for VB.NET
'LEADDICOMNet1 is a predefined LEADDicomNet object
Private Sub LEADDICOMNet1_NetReceiveUnknown(ByVal hNet As Integer, ByVal nPresentationID As Short, ByVal hCS As Integer, ByVal hDS As Integer) Handles LEADDICOMNet1.NetReceiveUnknown
Dim out As String
out = "Unknown Command Set/Data Set was received, and ignored"
out = out & Chr(13)
out = out & "Presentation ID: " & CStr(nPresentationID)
MessageBox.Show(out)
End Sub