Jag håller på med ett projekt i skolan och har fått massor av hjälp här. Nu är det så att vi måste kommentera all kod också. Två små kodsnuttar som jag har fått här klarar jag inte att tyda, så jag undrar om jag kunde få lite hjälp med det. Här är dom:

Private Const SND_ASYNC = &H1
Private Const SND_FILENAME = &H20000
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

OCH:

Public Sub PlayWave(Filename As String)
Dim lReturn As Long
lReturn = PlaySound(Filename, 0&, SND_FILENAME Or SND_ASYNC)
End Sub

Jag vet ju vad koden gör, men jag kan inte förklara allt...

Hej
Constanterna som du beskriver kan betraktas som
flaggor (växlar vilken väg som spår på en tågbangård skall jag ta ?)
tex SND_ASYNC talar om för PlaySound att ljudet
skall spelas Asynkront dvs du skall kunna göra
något annat med datorn medan ljudet spelar.
Motsatsen är Synkront då måste man vänta
till ljudet är färdigspelat innan man kan göra något annat

mvh
Sven
Lycka till med dina studier
DS

Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

Private - Anger att den bara är tilgänglig inom modulen.
Declare - Importerar Function eller Subrutin från en (c++) Dll.
Lib "winmm.dll" - Anger vilken dll fil, Söker i system katalogen program katlogen osv...
Alias "PlaySoundA" - Anger vad funktionen har för namn i dll-filen. Behövs inte anges om den överensstämmer med funktionens namn.
ByVal lpszName As String - Första parametern till funktionen. Anger filnamn.
ByVal hModule As Long - "Hantag" till modul ifall ljudet hämtas ur modulens resurser.
ByVal dwFlags As Long - Flaggor, anger hur det ska spelas upp.


Anpassad med en funktion, för att göra användning och anrop lättare.
Public Sub PlayWave(Filename As String)
Dim lReturn As Long
lReturn = PlaySound(Filename, 0&, SND_FILENAME Or SND_ASYNC)
End Sub

Hej
Ta inte illa upp Men Typiskt Ingengörssvar

Helt övertygad om att hon inte blev en sekund klokare
på ditt svar. Pedagokik brukar inte vara Era starka ämne.

mvh
Sven

Ledsen att jag inte hinner vara Petagogisk. Skrev inlägget underarbets tid. Chefen gillar det inte. Så du får förlåta mig... :O)