كيف يمكن تشغيل ملفات صوت متعاقبة

كيف يمكن عمل ذلك

'ÝÊÍ ãáÝ ÇáÕæÊ ÇáÇæá
    ModemWave1.PlayFileName = App.Path & "\a.wav"
    ModemWave1.Play (ModemWaveID)

  'ÝÊÍ ãáÝ ÇáÕæÊ ÇáËÇäì
     ModemWave1.PlayFileName = App.Path & "\b.wav"
    
    ModemWave1.Play (ModemWaveID)