A ver chicos, prueben esto:
Agreguen en su form dos botones, por ejemplo StartRecord y StopRecord y un control MMControl. Agreguen el evento Click para ambos botones.
Escriban este código para el evento del botón StartRecord:
Código:
MMControl1.FileName = "D:\Filename.wav"
MMControl1.Command = "Open"
MMControl1.Wait = False
MMControl1.Notify = True
MMControl1.Command = "Record"
y esto para el del botón StopRecord:
Código:
MMControl1.Command = "Stop"
Finalmente escriban este código para el evento mmcontrol_Done del control MMControl1
Código:
Private Sub MMControl1_Done(NotifyCode As Integer)
MMControl1.FileName = "D:\Raj.wav"
MMControl1.Command = "Save"
MMControl1.Command = "Close"
End Sub
Espero que les funcione!!
Salu2,
Shandrio