Click here to Skip to main content
15,885,278 members
Articles / Programming Languages / Visual Basic

MultiWave - a portable multi-device .NET audio player

Rate me:
Please Sign up or sign in to vote.
4.93/5 (23 votes)
13 May 2015Ms-PL11 min read 48.5K   6.6K   33  
This article describes the creation of a fully managed multi-device audio player using several public C# libraries. Requirements: VB .NET, Visual Studio 2008, .NET Framework 3.5
'------------------------------------------------------------------------------
' <auto-generated>
'     Dieser Code wurde von einem Tool generiert.
'     Laufzeitversion:2.0.50727.5448
'
'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
'     der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict On
Option Explicit On

Imports System

Namespace My.Resources
    
    'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
    '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
    'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
    'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
    '''<summary>
    '''  Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.0.0.0"),  _
     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
    Friend Module Resources
        
        Private resourceMan As Global.System.Resources.ResourceManager
        
        Private resourceCulture As Global.System.Globalization.CultureInfo
        
        '''<summary>
        '''  Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
        '''</summary>
        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
            Get
                If Object.ReferenceEquals(resourceMan, Nothing) Then
                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("MultiWave.Resources", GetType(Resources).Assembly)
                    resourceMan = temp
                End If
                Return resourceMan
            End Get
        End Property
        
        '''<summary>
        '''  Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
        '''  Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
        '''</summary>
        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
        Friend Property Culture() As Global.System.Globalization.CultureInfo
            Get
                Return resourceCulture
            End Get
            Set
                resourceCulture = value
            End Set
        End Property
        
        Friend ReadOnly Property about_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("about_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property arrow_down() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("arrow_down", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property arrow_up() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("arrow_up", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property background_window() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("background_window", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property browse_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("browse_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property browse_hover_active_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("browse_hover_active_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property close_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("close_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property kompakt_master() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("kompakt_master", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property kompaktmodus() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("kompaktmodus", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property loop_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("loop_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property loop_hover_active_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("loop_hover_active_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property Master_Pannel() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("Master_Pannel", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property minimize_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("minimize_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property MultiWave() As System.Drawing.Icon
            Get
                Dim obj As Object = ResourceManager.GetObject("MultiWave", resourceCulture)
                Return CType(obj,System.Drawing.Icon)
            End Get
        End Property
        
        Friend ReadOnly Property options_menue() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("options_menue", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property pause_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("pause_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property pause_hover_active_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("pause_hover_active_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property play_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("play_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property play_hover_active_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("play_hover_active_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property player_background() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("player_background", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property PlayIcon() As System.Drawing.Icon
            Get
                Dim obj As Object = ResourceManager.GetObject("PlayIcon", resourceCulture)
                Return CType(obj,System.Drawing.Icon)
            End Get
        End Property
        
        '''<summary>
        '''  Sucht eine lokalisierte Zeichenfolge, die Radio channels:
        '''00&apos;s Club Hits;http://goo.gl/KLlY6m
        '''8Bit;http://178.32.50.185:60034/stream
        '''Ambient;http://goo.gl/KYZEXC
        '''Bass &amp; Jackin;http://goo.gl/pnw00c
        '''Bassline;http://goo.gl/85abPX
        '''Big Beat;http://goo.gl/JwUoct
        '''Big Room House;http://goo.gl/nM9KJO
        '''Breaks;http://goo.gl/yj8z7Y
        '''ChillHop;http://goo.gl/pTM8kz
        '''Chillout Dreams;http://goo.gl/pWBXPp
        '''Chillout;http://goo.gl/3DbFWl
        '''Chillstep;http://goo.gl/25gJhg
        '''Classic EuroDance;http://goo.gl/DeKh27
        '''Classic EuroDisco;http://goo.gl/UxM6Yb
        '''Classic Tran [Rest der Zeichenfolge wurde abgeschnitten]&quot;; ähnelt.
        '''</summary>
        Friend ReadOnly Property Radio_Streams() As String
            Get
                Return ResourceManager.GetString("Radio_Streams", resourceCulture)
            End Get
        End Property
        
        Friend ReadOnly Property StopIcon() As System.Drawing.Icon
            Get
                Dim obj As Object = ResourceManager.GetObject("StopIcon", resourceCulture)
                Return CType(obj,System.Drawing.Icon)
            End Get
        End Property
        
        Friend ReadOnly Property stopp_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("stopp_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property stopp_hover_action_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("stopp_hover_action_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property time_total_time_display() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("time_total_time_display", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property url_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("url_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property url_hover_active_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("url_hover_active_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property wave_writer_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("wave_writer_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property wave_writer_hover_active_button() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("wave_writer_hover_active_button", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property waveform_fullscreen_back() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("waveform_fullscreen_back", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
        
        Friend ReadOnly Property waveform_normal_back() As System.Drawing.Bitmap
            Get
                Dim obj As Object = ResourceManager.GetObject("waveform_normal_back", resourceCulture)
                Return CType(obj,System.Drawing.Bitmap)
            End Get
        End Property
    End Module
End Namespace

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article, along with any associated source code and files, is licensed under The Microsoft Public License (Ms-PL)


Written By
Engineer
Germany Germany
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.

Comments and Discussions