Getting Started with Toub.Sound.Midi

Initial setup

Locate and add Toub.Sound.Midi.dll as a project resource
Import the library into your program by adding the following at the start of your form's code

Imports Toub.Sound.Midi

Creating a new sequence & track

The following code shows how to declare a new sequence & track

Dim mySeq as MidiSequence = New MidiSequence(0,120)
Dim myTrk as MidiTrack = mySeq.addTrack()

Building a track

To build a track, first add notes as follows

Dim Channel as Byte, Duration as Double, Pitch as Byte, Velocity as Byte
:
myTrk.Events.Add(New NoteOn(0, Channel, Pitch, Velocity))
myTrk.Events.Add(New NoteOff(CInt(Duration * 480), Channel, Pitch, Velocity))

To finish a track, add an "End of Track" event to the end

myTrk.Events.Add(New EndOfTrack(130))

Playing a sequence

Use the MidiPlayer to play a sequence

MidiPlayer.Play(mySeq)

Saving a sequence

Dim fName as String
:
mySeq.Save(fName)

Retrieving a sequence

Dim fName as String
:
mySeq = MidiSequence.Import(fName)