Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset
A volume slider and tempo control using MIDI system exclusive messages.
For i = 0 To UBound(ByteData) ByteData(i) = ByteData(i) Xor Asc(Mid(Key, (i Mod KeyLen) + 1, 1)) Next i
lstProcess.Clear
If you download exclusive source code and it crashes immediately, follow these three fixes: