'Declaration
Public Sub SendNCreateResponse( _
ByVal As Byte, _
ByVal As Integer, _
ByVal As String, _
ByVal As String, _
ByVal As DicomCommandStatusType, _
ByVal As DicomDataSet, _
ByVal As String _
)
'Usage
Dim instance As ClientSession
Dim presentationID As Byte
Dim messageID As Integer
Dim abstractClass As String
Dim affectedSOPInstanceUID As String
Dim status As DicomCommandStatusType
Dim responseDataset As DicomDataSet
Dim descriptionMessage As String
instance.SendNCreateResponse(presentationID, messageID, abstractClass, affectedSOPInstanceUID, status, responseDataset, descriptionMessage)