Fazer o cd tocar a musica - Ok
agora nao tenho ideia de como gravar ela em wav..
Private Sub Startrecord_Click()
With MMControl1
.Notify = False
.Wait = True
.Shareable = False
.DeviceType = "CDAudio"
.Command = "Open"
.Command = "Play"
.Command = "Record"
End With
End Sub
Private Sub Stoprecord_Click()
With MMControl1
.Command = "Stop"
..........
..........'.Command = "Save"
..........
.Command = "Close"
End With
End Sub
