::Help::Alguien tiene idea de cual es el comando para abrir la lectora de CD desde un CommandButton o cualquier otro elemento clikeable

Puedes probar esto:

Para controlar por medio de dos botones, dentro de un formulario por ejemplo, la apertura y el cierre de la bandeja de carga de la unidad de CD's del ordenador.

Para empezar tienes que agregar en las declaraciones del módulo que va a manejar el formulario con los botones la siguiente línea:

Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

Luego, en el formulario donde se desea trabajar colocar los dos botones que harán la apertura y el cierre de la bandeja.

Dentro del botón para abrir, colocar:

ret = mciSendString("set CDAudio door open", returnstring, 127, 0)

Y dentro del botón cerrar:

ret = mciSendString("set CDAudio door closed", returstring, 127, 0)

:bye:

Muchas gracias Manumartinez, ha funcionado:Bien: