Virtual Wave Driver v1.0 |
The WriteStream method sends raw audio stream to the VWD.
Function WriteStream(Data as variant) As Long
Code sample:
Private Sub VirtualDest_OnStreamDataRequest(ByVal cbSize As Long, ByVal pDataAddr As Long) Dim var() As Byte ReDim var(cbSize) ' process the buffer (fill it with your data) .... Dim iwritten As Long written = VirtualDest.WriteStream(var) Debug.Print "cbSize=" & cbSize & " written=" & written End Sub