Inserting a Wave Stream Into a Data Set Example for Visual Basic

Function InsertWaveFileIntoDataSet(objDataSet As LEADDicomDS, _
                                   sInputWaveFilename As String) As Boolean
   InsertWaveFileIntoDataSet = False
   
   Dim objAudioWaveformGroup As New DicomWaveformGroup
   objAudioWaveformGroup.EnableMethodErrors = False
   
   ' Load the audio file into the waveform group
   If objAudioWaveformGroup.LoadAudio(sInputWaveFilename) <> DICOM_SUCCESS Then
      Exit Function
   End If
   
   ' Insert the audio waveform group into the Data Set
   If objDataSet.AddWaveformGroup (objAudioWaveformGroup) <> DICOM_SUCCESS Then
      Exit Function
   End If
   
   InsertWaveFileIntoDataSet = True
End Function