Gå til innhold

Anbefalte innlegg

Videoannonse
Annonse
Skrevet (endret)

Slik kan det gjøres:

 

VB 6.0:

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Private Sub Form_Load()
    'Spill lyden "lyd.wav" som ligger i samme mappen som .exe-filen
    sndPlaySound "lyd.wav", SND_ASYNC
End Sub

 

VB .Net:

Dim LydSpiller as new System.Media.SoundPlayer

Private Sub Form1_Load(ByVal Sender as System.Object, ByVal e as System.EventArgs) Handles MyBase.Load
    'Spill lyden "lyd.wav" som ligger i samme mappen som .exe-filen
    LydSpiller.SoundLocation = My.Application.Info.DirectoryPath & "\lyd.wav"
    LydSpiller.Play()
End Sub

 

(Du kan dessverre kun spille av .wav-filer med desse kodene)

 

 

Degeim

Endret av Degeim
Skrevet

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

 

hvor er det jeg skal skrive inn dette?

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
  • Hvem er aktive   0 medlemmer

    • Ingen innloggede medlemmer aktive
×
×
  • Opprett ny...