 Not (m_tFormat.wBitsPerSample = 16) _
      Or Not (m_tFormat.nChannels = 2) Then
      CloseFile
      pInternalErrorHandler 1
      Exit Function
   End If
    
   ' Find the data subchunk
   mmckinfoSubchunkIn.ckid = mmioStringToFOURCC("data", 0)
   lR = mmioDescend(m_hMMioIn, mmckinfoSubchunkIn, mmckinfoParentIn,
    MMIO_FINDCHUNK)
   If Not (lR = MMSYSERR_NOERROR) Then
      CloseFile
      pInternalErrorHandler 6
      Exit Function
   End If
   m_lDataOffset = mmioSeek(m_hMMioIn, 0, SEEK_CUR)
    
