Public Function TestConformance( _
   ByVal callback As DicomTestConformanceCallback _
) As Boolean

Dim instance As DicomDataSet
Dim callback As DicomTestConformanceCallback
Dim value As Boolean
 
value = instance.TestConformance(callback)

public bool TestConformance( 
   DicomTestConformanceCallback callback
)

public:
bool TestConformance( 
   DicomTestConformanceCallback^ callback
) 

Public Function DicomTestConformanceCallback(ByVal element As DicomElement, ByVal flags As DicomTestConformanceFlags) As Boolean
   Dim s As String = String.Format("Element: {0}", element.Tag.ToString())
   If flags = DicomTestConformanceFlags.None Then
      Console.WriteLine(s & " no error.")
   Else
      Console.WriteLine(s & " error: " & flags.ToString())
   End If
   Return True
End Function

Public Sub TestConformanceSample()
   Dim dicomFileName As String = LeadtoolsExamples.Common.ImagesPath.Path + "IMAGE3.dcm"
   'Make sure to initialize the DICOM engine, this needs to be done only once 
   'In the whole application
   DicomEngine.Startup()
   Dim ds As DicomDataSet = New DicomDataSet()
   Try
      'Load DICOM File
      ds.Load(dicomFileName, DicomDataSetLoadFlags.None)

      'Test it
      ds.TestConformance(AddressOf DicomTestConformanceCallback)
   Finally
      CType(ds, IDisposable).Dispose()
   End Try
   DicomEngine.Shutdown()
End Sub

public bool DicomTestConformanceCallback(DicomElement element, DicomTestConformanceFlags flags)
{
   string s = string.Format("Element: {0}", element.Tag.ToString());
   if (flags == DicomTestConformanceFlags.None)
      Console.WriteLine(s + " no error.");
   else
      Console.WriteLine(s + " error: " + flags.ToString());
   return true;
}

public void TestConformanceSample()
{
   string dicomFileName = LeadtoolsExamples.Common.ImagesPath.Path + "IMAGE3.dcm";
   //Make sure to initialize the DICOM engine, this needs to be done only once 
   //In the whole application
   DicomEngine.Startup();
   using (DicomDataSet ds = new DicomDataSet())
   {
      //Load DICOM File
      ds.Load(dicomFileName, DicomDataSetLoadFlags.None);

      //Test it
      ds.TestConformance(DicomTestConformanceCallback);
   }
   DicomEngine.Shutdown();
}

public bool DicomTestConformanceCallback(DicomElement element, DicomTestConformanceFlags flags)
{
   string s = string.Format("Element: {0}", element.Tag.ToString());
   if (flags == DicomTestConformanceFlags.None)
      Console.WriteLine(s + " no error.");
   else
      Console.WriteLine(s + " error: " + flags.ToString());
   return true;
}
public void TestConformanceSample(Stream dicomStream)
{
   //Make sure to initialize the DICOM engine, this needs to be done only once 
   //In the whole application
   DicomEngine.Startup();
   using (DicomDataSet ds = new DicomDataSet())
   {
      //Load DICOM File
      ds.Load(dicomStream, DicomDataSetLoadFlags.None);

      //Test it
      ds.TestConformance(DicomTestConformanceCallback);
   }
   DicomEngine.Shutdown();
}

Public Function DicomTestConformanceCallback(ByVal element As DicomElement, ByVal flags As DicomTestConformanceFlags) As Boolean
   Dim s As String = String.Format("Element: {0}", element.Tag.ToString())
   If flags = DicomTestConformanceFlags.None Then
      Console.WriteLine(s & " no error.")
   Else
      Console.WriteLine(s & " error: " & flags.ToString())
   End If
   Return True
End Function
Public Sub TestConformanceSample(ByVal dicomStream As Stream)
   'Make sure to initialize the DICOM engine, this needs to be done only once 
   'In the whole application
   DicomEngine.Startup()
   Using ds As DicomDataSet = New DicomDataSet()
      'Load DICOM File
      ds.Load(dicomStream, DicomDataSetLoadFlags.None)

      'Test it
      ds.TestConformance(AddressOf DicomTestConformanceCallback)
   End Using
   DicomEngine.Shutdown()
End Sub