ChangeTransferSyntax Example for Visual Basic

    ' Load a Data Set
    If LEADDICOM1.LoadDS ("d:\lead14\dist\images\dicom\image2.dic", 0) = DICOM_SUCCESS Then
       ' Change the Transfer Syntax to Explicit VR Big Endian
       LEADDICOM1.ChangeTransferSyntax UID_EXPLICIT_VR_BIG_ENDIAN, 0, 0
    
       ' Save the new Data Set
       LEADDICOM1.SaveDS "d:\temp\Temp.dic", 0
    End If