Datenschutz-Erklärung
Benutzername:  Passwort:  Remember? Click here to register | Forgot Your Password?
Radio NoLimits - Forum: Musicplayer


 Thema drucken
Musicplayer
idefix145
Netter kleiner Radio NoLimitsplayer. (Windows)
http://www.kb-rad...player.zip

VB Quellcode ©by SKIDE-SISSDEM
Virenfrei!
Download Code  Code

Public Class Form1

    Private Sub AxWindowsMediaPlayer1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AxWindowsMediaPlayer1.Enter

    End Sub



    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
    Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        AxWindowsMediaPlayer1.URL = "http://www.kb-radio.de/portal/infusions/gr_radiostatus_panel/gr_radiostatus_player.php?id=1&p=asx"
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        AxWindowsMediaPlayer1.URL = ""
    End Sub

    Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll
        AxWindowsMediaPlayer1.settings.volume = TrackBar1.Value
    End Sub

    Private Sub PictureBox1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs)
        AxWindowsMediaPlayer1.URL = "http://www.kb-radio.de/portal/infusions/gr_radiostatus_panel/gr_radiostatus_player.php?id=1&p=asx"
    End Sub

    Private Sub PictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        AxWindowsMediaPlayer1.URL = "http://www.kb-radio.de/portal/infusions/gr_radiostatus_panel/gr_radiostatus_player.php?id=1&p=asx"
    End Sub
End Class





Bearbeitet von idefix145 am 28.02.2018 um 19:36
Man kann mir nicht Kündigen,
Sklaven werden verkauft
 
http://www.kb-radio.de
idefix145
final version
http://www.kb-rad..._final.zip
es werden keine weiteren updates verfügbar

*ide

have fun :)
Man kann mir nicht Kündigen,
Sklaven werden verkauft
 
http://www.kb-radio.de
Klasse Bruderherz. Das wäre eine nette Android app. Die vorhandene tut es ja nicht mehr......applause
 
idefix145
android .. irgend wann kauf ich mir eins :)
bei mir läuft alles auf win oder eben IOS
Man kann mir nicht Kündigen,
Sklaven werden verkauft
 
http://www.kb-radio.de
Springe ins Forum:

Home
Impressum
Mail

Sendeplan
Teamlist
Chat
Forum
Baloons
Radiostatus
Viel Spass wuenscht das Team von Radio NoLimits - www.kb-radio.de