La Web del Programador: Comunidad de Programadores
 
    Pregunta:  1365 - SABER LA TARJETA DE SONIDO
Autor:  Daniel Micol
Me gustaría hacer que en un ComboBox aparecieran todas las tarjetas de sonido que hubiera en mi ordenador, con el nombre, claro está.

Gracias

  Respuesta:  Carlos Andres Becerra Bohorquez
Intenta con este codigo:
Private Declare Function waveOutGetNumDevs Lib
"winmm.dll" () As Long

Private Sub Form_Load()
Dim inf As Integer
inf = waveOutGetNumDevs()
If inf > 0 Then
MsgBox "Tarjeta de sonido soportada.", vbInformation, "Informacion: Tarjeta de sonido"
Else
MsgBox "Tarjeta de sonido no soportada.", vbInformation, "Informacion: Tarjeta de sonido"
End If
End
End Sub

De lo contrario en la direccion que aparece abajo, hay un codigo para detectar en CD, y creo que te puede servir para la tarjeta de sonido
http://www.personales.com/colombia/santafedebogota/VisualBasic
O utiliza el link de esta paguina para mirar los api´s