Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: MP3 abspielen
Autor: TheSplash
Datum: 20.10.01 18:19
Hi !! hier der Quelltext> ============================================================== Option Explicit Private Sub Check1_Click() If Check1.Value = 1 Then MediaPlayer.Visible = True Else MediaPlayer.Visible = False End If End Sub Private Sub Command1_Click() Dim file As String CommonDialog1.ShowOpen Pfad.Caption = CommonDialog1.FileName file = CommonDialog1.FileName MediaPlayer.Open file End Sub Private Sub Command2_Click() If (Pfad.Caption = "") Then MsgBox "Sie müssen erst eine MP3 Datei auswählen!", vbInformation Else MediaPlayer.Play End If End Sub Private Sub Command3_Click() MediaPlayer.Stop End Sub Private Sub Timer1_Timer() time.Caption = MediaPlayer.CurrentPosition End Sub ================================================================= ich hoffe, ich konnte dir helfen !! cu TheSplash

MP3 abspielen	35	Matze	19.10.01 21:28
Re: MP3 abspielen	251	Dieter	20.10.01 00:23
Re: MP3 abspielen	28	TheSplash	20.10.01 18:19

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen