Lägg funktionerna i en modul.
Frågan#1
Om jag skall göra samma sak med olika forumulär skulle det ju vara smart att samla alla funktioner istället för att rada upp dem flera gånger i vaje form.
Hur gör man det?
Återanvända funktioner?
5 svar · 203 visningar · startad av Jesper T
Ok, men hur kallar man på subbar och funktionerna ifrån formen?
Får en massa fel när jag försöker att kompilera om jag lägger funktioner i en modul. Vad skall man tänka på?
Om jag tex. lägger detta i min modul
Private Const SND_FILENAME = &H20000 ' name is a file name
Private Const SND_NODEFAULT = &H2 ' silence not default, if sound not found
Private Const SND_SYNC = &H0 ' play synchronously (default)
Private Const SND_ASYNC = &H1 ' play asynchronously
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Och detta i form1
PlaySound "blip.wav", 0, SND_FILENAME Or SND_ASYNC
Då klagar den på odeklarerad variabel SND_FILENAME
Skriv om alla Private till Public så ska det fungera.
Har du Private innebär det att variablarna och funktionen endast kan kommas åt ifrån modulen och inte ifrån formerna.