'Declaration
Sub SendCMoveRequest( _
ByVal As DicomRequest, _
ByVal As Byte, _
ByVal As Integer, _
ByVal As String, _
ByVal As DicomCommandPriorityType, _
ByVal As String, _
ByVal As DicomDataSet _
)
'Usage
Dim instance As IDicomRequest
Dim requestInfo As DicomRequest
Dim presentationID As Byte
Dim messageID As Integer
Dim affectedClass As String
Dim priority As DicomCommandPriorityType
Dim moveAE As String
Dim dataSet As DicomDataSet
instance.SendCMoveRequest(requestInfo, presentationID, messageID, affectedClass, priority, moveAE, dataSet)