VISUAL BASIC / Ses Karti Var Mi?
Denemek İçin Asagidaki Kodu Bir Modulenin İçine Kopyalayin.
Declare Function waveOutGetNumDevs Lib "winmm.dll" Alias "waveOutGetNumDevs" () As Long
Bu kodu da formunuzun Form_Load olayı altına kopyalayın:
Dim i As Integer
i = waveOutGetNumDevs()
If i > 0 Then...