.wav Datei als Ereignis abspielen???

[Teerow]

Hi!


Ich habe einen Countdown programmiert. Wenn dieser nun auf 0 ist, soll eine bestimmte Wav Datei abgespielt werden.

Der bisherige Code sieht so aus:

Option Explicit

Dim I As Integer

Private Sub accept_Click()
    I = Text1.Text
End Sub
Private Sub back_Click()
    Timer1.Enabled = False
    Text1.Text = "0"
    Label1.Caption = "0"
    I = 0
    Start.Caption = "Start"
End Sub

Private Sub Ende_Click()
    End
End Sub

Private Sub Form_Load()
    Timer1.Tag = I
    Timer1.Interval = 1000
End Sub

Private Sub Start_Click()
    If Timer1.Enabled = False Then
        Timer1.Enabled = True
        Start.Caption = "Anhalten"
    Else
        Timer1.Enabled = False
        I = Label1.Caption
        Start.Caption = "Fortsetzen"
    End If
End Sub

Private Sub timer1_timer()
    If I <= 0 Then
        Timer1.Enabled = False
    End If
    Label1.Caption = Str(I)
    I = I - 1
End Sub

Könnte mir da jmd. sagen, wie ich die Datei tada.wav (Windows/Media/) abspiele ,wenn der timer auf 0 ist?

1000 DANk im Vorraus

 

[Johannes Postler]

http://www.tutorials.de/tutorials121697.html

Zwei Themen vor diesem ...

cu tirolausserfern

 

[Aarisch]

Ungültiger thread angegeben.

Da kommt diese fehlermeldung...

Kann das sein, dass der Link falsch ist?

Dumme Frage - ich seh doch dass er net funzt...

Kann denn jemand das Thema mal erläutern?
Mich interressiert's nämlich auch mal...

 

[Dario Linsky]

Sieh mal hier:
http://www.tutorials.de/tutorials124152.html

 

[Johannes Postler]

Sorry, aber das Thema befindet sich im Visual Basic Forum. Schau einfach selber noch einmal nach.

cu tirolausserfern

 

[Dario Linsky]

Welchen Titel hat das Thema denn? Das würde bei der Suche evtl. helfen.

 

[Aarisch]

Hä?

Was hast du denn?

Das Thema hat Lirion doch schon längst als Link gepostet...

Bin schon fündig geworden