Ik ben momenteel bezig om een quiz te maken mbv Access. In dit formulier maak ik gebruik van een knop. Ik wil nu dat op het moment dat ik de deze knop klik een wav file afspelen. Na wat googlen en zoeken ben ik tot de volgende code gekomen:
Wanneer ik nu echter de knop activeer krijg ik de volgende foutmelding:
De expressie Bij klikken die u hebt opgegeven als instelling voor de gebeurteniseigenschap, heeft de volgende fout veroorzaakt: Er mogen alleen opmerkingen staan na End Sub, End Function of End Property.
heeft er iemand een ander optie om deze wav file af te spelen.
Code:
Private Sub Knop23_Click()
Private Declare Function apiPlaySound Lib "Winmm.dll" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Call apiPlaySound("C:\WINDOWS\Media\Chimes.wav", 0)
End Sub
Wanneer ik nu echter de knop activeer krijg ik de volgende foutmelding:
De expressie Bij klikken die u hebt opgegeven als instelling voor de gebeurteniseigenschap, heeft de volgende fout veroorzaakt: Er mogen alleen opmerkingen staan na End Sub, End Function of End Property.
- De expressie geeft niet de naam van een macro, de naam van een door de gebruiker gedefineerde functie of een [Gebeurtenisprocedure] als result.
- Er is een fout opgetreden bij het evalueren van een functie, gebeurtenis of macro.
heeft er iemand een ander optie om deze wav file af te spelen.