Public Sub DeleteModule( _
   ByVal module As DicomModuleType _
) 

Dim instance As DicomDataSet
Dim module As DicomModuleType
 
instance.DeleteModule(module)

public void DeleteModule( 
   DicomModuleType module
)

public:
void DeleteModule( 
   DicomModuleType module
) 

Public Sub DicomModuleSample()
   'Make sure to initialize the DICOM engine, this needs to be done only once 
   'In the whole application
   DicomEngine.Startup()

   Dim dicomDataset As DicomDataSet = New DicomDataSet()
   Using (dicomDataset)

      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian)
      dicomDataset.DeleteModule(DicomModuleType.Patient)
      dicomDataset.InsertModule(DicomModuleType.Patient, False)
      Dim [module] As DicomModule = dicomDataset.FindModule(DicomModuleType.Patient)
      Debug.Assert(Not [module] Is Nothing)
      Dim found As Boolean = False
      Dim i As Integer = 0
      Do While i < dicomDataset.ModuleCount
         [module] = dicomDataset.FindModuleByIndex(i)
         If [module].Type = DicomModuleType.Patient Then
            found = True
         End If
         i += 1
      Loop
      Debug.Assert(found)
   End Using

   DicomEngine.Shutdown()
End Sub

public void DicomModuleSample()
{
   //Make sure to initialize the DICOM engine, this needs to be done only once 
   //In the whole application
   DicomEngine.Startup();
   using (DicomDataSet dicomDataset = new DicomDataSet())
   {
      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian);
      dicomDataset.DeleteModule(DicomModuleType.Patient);
      dicomDataset.InsertModule(DicomModuleType.Patient, false);
      DicomModule module = dicomDataset.FindModule(DicomModuleType.Patient);
      Debug.Assert(module != null);
      bool found = false;
      for (int i = 0; i < dicomDataset.ModuleCount; i++)
      {
         module = dicomDataset.FindModuleByIndex(i);
         if (module.Type == DicomModuleType.Patient)
         {
            found = true;
         }
      }
      Debug.Assert(found);
   }
   DicomEngine.Shutdown();
}

public void DicomModuleSample()
{
   //Make sure to initialize the DICOM engine, this needs to be done only once 
   //In the whole application
   DicomEngine.Startup();
   using (DicomDataSet dicomDataset = new DicomDataSet())
   {
      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian);
      dicomDataset.DeleteModule(DicomModuleType.Patient);
      dicomDataset.InsertModule(DicomModuleType.Patient, false);
      DicomModule module = dicomDataset.FindModule(DicomModuleType.Patient);
      Debug.Assert(module != null);
      bool found = false;
      for (int i = 0; i < dicomDataset.ModuleCount; i++)
      {
         module = dicomDataset.FindModuleByIndex(i);
         if (module.Type == DicomModuleType.Patient)
         {
            found = true;
         }
      }
      Debug.Assert(found);
   }
   DicomEngine.Shutdown();
}

Public Sub DicomModuleSample()
   'Make sure to initialize the DICOM engine, this needs to be done only once 
   'In the whole application
   DicomEngine.Startup()
   Using dicomDataset As DicomDataSet = New DicomDataSet()
      dicomDataset.Initialize(DicomClassType.DXImageStoragePresentation, DicomDataSetInitializeType.ExplicitVRLittleEndian)
      dicomDataset.DeleteModule(DicomModuleType.Patient)
      dicomDataset.InsertModule(DicomModuleType.Patient, False)
      Dim [module] As DicomModule = dicomDataset.FindModule(DicomModuleType.Patient)
      Debug.Assert(Not [module] Is Nothing)
      Dim found As Boolean = False
      Dim i As Integer = 0
      Do While i < dicomDataset.ModuleCount
         [module] = dicomDataset.FindModuleByIndex(i)
         If [module].Type = DicomModuleType.Patient Then
            found = True
         End If
         i += 1
      Loop
      Debug.Assert(found)
   End Using
   DicomEngine.Shutdown()
End Sub