si proba de esta forma:

1) Tienes que crea un archivo de sonido que en un comienzo no va a tener
nada y ponelo en el directorio raiz por ejemplo (usa el boton derecho
del mouse, nuevo, archivo de sonido. Ej: prueba.wav)

2) Este es el codigo
Private Sub Form_Load()
' Establece las propiedades necesarias para abrir MCI.
    MMControl1.Notify = False
    MMControl1.Wait = True
    MMControl1.Shareable = False
    MMControl1.DeviceType = "WaveAudio"
    MMControl1.filename = "C:\prueba.WAV"

    ' Abre el dispositivo MCI WaveAudio.
    MMControl1.Command = "Open"
End Sub

En un command o donde prefieras pones la opcion de grabar y cerrar el
control mci
MMControl1.Command = "Save"
MMControl1.Command = "Close"

Espero te funcione.
-------------------------------------------------------
Osvaldo E. Vargas
Estudiante Licenciatura en Sistemas
mailto: vader@lanet.losandes.com.ar
-------------------------------------------------------


VB>Hola a todos:
VB> estoy intentando hacer que un programa grabe un archivo de sonido que el
VB>usuario ha grabado mediante un micrófono.
VB>Para ello estoy empleando un control MCI, pero cuando digo que mm.command =
VB>"save", se graba un archivo con longitud 0 bytes. Al MCI le tengo dicho que
VB>wait = true, y por supuesto el filename.
VB>¿Alguien ha conseguido grabar alguna vez un archivo de sonido grabado con el
VB>MCI?
VB>Gracias a todos por adelantado