| (Modul)(General)(Declaration)
Public Declare Function waveOutGetNumDevs Lib "winmm.dll" () As Long
Private Sub Command1_Click()
Dim i As Integer
i = waveOutGetNumDevs()
If i > 0 Then
MsgBox " Sistemde Ses Kartı Bulu
Devamını Görmek İçin Üye Girişi Yapmanız Gerekmektedir. |