Gå til innhold

Anbefalte innlegg

Videoannonse
Annonse

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
Lenke til kommentar

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å
×
×
  • Opprett ny...