Memainkan file MIDI di Visual Basic

Penggunaan file MIDI di aplikasi dapat difungsikan sebagai sound effect (mungkin pada saat menutup aplikasi, ada notifikasi dan semacamnya). File MIDI sendiri berukuran cukup kecil biasanya dalam kisaran kilobyte, sehingga sangatlah sesuai sebagai pelengkap dan membuat pengguna nyaman dengan aplikasi anda.
Untuk memainkan file MIDI di Visual Basic dapat anda gunakan bantuan dari DirectX, yang bernama AudioVideoPlayback.
Pertama lakukan imports seperti dibawah ini:

Imports Microsoft.DirectX.AudioVideoPlayback

Potongan kode pada event click btnPlay:

Private Sub btnPlay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPlay.Click

    If btnPlay.Text = "Play" Then

        btnPlay.Text = "Stop"

        fileAudio = New Audio(txtLokasiFile.Text)

        fileAudio.Play()

        fileStartTime = Now

    Else

        btnPlay.Text = "Play"

        fileAudio.Stop()

        fileAudio.Dispose()

        fileAudio = Nothing

    End If

End Sub

Sebenarnya fungsi dari AudioVideoPlayback tidak hanya terbatas pada file MIDI, jadi dapat anda gunakan untuk beberapa tipe Audio lainnya dan tentu saja beberapa jenis Video juga bisa dimainkan.