Inserting a Wave Stream Into a Data Set Example for VB.NET

Function InsertWaveFileIntoDataSet(ByRef objDataSet As LTDICLib.LEADDicomDS, ByRef sInputWaveFilename As String) As Boolean
   InsertWaveFileIntoDataSet = False

    Dim objAudioWaveformGroup As New LTDICLib.DicomWaveformGroup
   objAudioWaveformGroup.EnableMethodErrors = False

    ' Load the audio file into the waveform group
   If objAudioWaveformGroup.LoadAudio(sInputWaveFilename) <> LTDicomKernelLib.DicomErrorCodes.DICOM_SUCCESS Then
       Exit Function
   End If

    ' Insert the audio waveform group into the Data Set
   If objDataSet.AddWaveformGroup(objAudioWaveformGroup) <> LTDicomKernelLib.DicomErrorCodes.DICOM_SUCCESS Then
       Exit Function
   End If

    InsertWaveFileIntoDataSet = True
End Function