MIDI-muotoiset äänitiedostot ovat usein pitkiä, joten toisto saattaa olla tarpeen lopettaa
ääni (esim. kun makro on valmis). Tässä on esimerkki:
Yksityinen ilmoitustoiminto mciExecute Lib "winmm.dll" _ (ByVal lpstrCommand As String) Pitkänä alipelinä "play" & MidiFileName "aloita toisto Else mciExecute" stop "& MidiFileName" lopeta toisto Lopeta jos Lopeta Alatestit "MsgBox" Lopeta MIDI -tiedoston toisto napsauttamalla OK … "PlayMidiFile" c: \ kansion nimi \ äänitiedostonimi.mid ", False End Sub