├── README.md └── Youtube Subscribers Livecount ├── Youtube Subscribers Livecount.v12.suo ├── Youtube Subscribers Livecount ├── bin │ └── Debug │ │ ├── Youtube Subscribers Livecount.pdb │ │ ├── Youtube Subscribers Livecount.vshost.exe │ │ ├── Youtube Subscribers Livecount.vshost.exe.manifest │ │ ├── Youtube Subscribers Livecount.xml │ │ ├── Youtube Subscribers Livecount.exe.config │ │ └── Youtube Subscribers Livecount.vshost.exe.config ├── obj │ └── Debug │ │ ├── Youtube Subscribers Livecount.pdb │ │ ├── DesignTimeResolveAssemblyReferences.cache │ │ ├── TempPE │ │ └── My Project.Resources.Designer.vb.dll │ │ ├── DesignTimeResolveAssemblyReferencesInput.cache │ │ ├── Youtube_Subscribers_Livecount.Form1.resources │ │ ├── Youtube_Subscribers_Livecount.Resources.resources │ │ ├── Youtube Subscribers Livecount.vbproj.GenerateResource.Cache │ │ ├── Youtube Subscribers Livecount.xml │ │ └── Youtube Subscribers Livecount.vbproj.FileListAbsolute.txt ├── My Project │ ├── Settings.settings │ ├── Application.myapp │ ├── AssemblyInfo.vb │ ├── Application.Designer.vb │ ├── Resources.Designer.vb │ ├── Settings.Designer.vb │ └── Resources.resx ├── Form1.vb ├── app.config ├── Form1.Designer.vb ├── Youtube Subscribers Livecount.vbproj └── Form1.resx └── Youtube Subscribers Livecount.sln /README.md: -------------------------------------------------------------------------------- 1 | # Youtube-LiveCount-Subscribers 2 | View any YouTube channel's real-time subscriber count En DESKTOP 3 | Source Code En VB.NET 4 | 5 | ![alt text](https://i.imgur.com/sD3wezh.png) 6 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount.v12.suo: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount.v12.suo -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.pdb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.pdb -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube Subscribers Livecount.pdb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube Subscribers Livecount.pdb -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.vshost.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.vshost.exe -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/DesignTimeResolveAssemblyReferences.cache: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/DesignTimeResolveAssemblyReferences.cache -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube_Subscribers_Livecount.Form1.resources: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube_Subscribers_Livecount.Form1.resources -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube_Subscribers_Livecount.Resources.resources: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube_Subscribers_Livecount.Resources.resources -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube Subscribers Livecount.vbproj.GenerateResource.Cache: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/X-SLAYER/Youtube-LiveCount-Subscribers/master/Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube Subscribers Livecount.vbproj.GenerateResource.Cache -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/My Project/Settings.settings: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/My Project/Application.myapp: -------------------------------------------------------------------------------- 1 | 2 | 3 | true 4 | Form1 5 | false 6 | 0 7 | true 8 | 0 9 | 0 10 | true 11 | 12 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.vshost.exe.manifest: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.xml: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | YoutubeSubscribersLivecount 6 | 7 | 8 | 9 | 10 | 11 | Returns the cached ResourceManager instance used by this class. 12 | 13 | 14 | 15 | Overrides the current thread's CurrentUICulture property for all 16 | resource lookups using this strongly typed resource class. 17 | 18 | 19 | 20 | A strongly-typed resource class, for looking up localized strings, etc. 21 | 22 | 23 | 24 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube Subscribers Livecount.xml: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | YoutubeSubscribersLivecount 6 | 7 | 8 | 9 | 10 | 11 | Returns the cached ResourceManager instance used by this class. 12 | 13 | 14 | 15 | Overrides the current thread's CurrentUICulture property for all 16 | resource lookups using this strongly typed resource class. 17 | 18 | 19 | 20 | A strongly-typed resource class, for looking up localized strings, etc. 21 | 22 | 23 | 24 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount.sln: -------------------------------------------------------------------------------- 1 | 2 | Microsoft Visual Studio Solution File, Format Version 12.00 3 | # Visual Studio 2013 4 | VisualStudioVersion = 12.0.21005.1 5 | MinimumVisualStudioVersion = 10.0.40219.1 6 | Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Youtube Subscribers Livecount", "Youtube Subscribers Livecount\Youtube Subscribers Livecount.vbproj", "{797ABB25-2F06-485C-BD19-BC1A7C88182F}" 7 | EndProject 8 | Global 9 | GlobalSection(SolutionConfigurationPlatforms) = preSolution 10 | Debug|Any CPU = Debug|Any CPU 11 | Release|Any CPU = Release|Any CPU 12 | EndGlobalSection 13 | GlobalSection(ProjectConfigurationPlatforms) = postSolution 14 | {797ABB25-2F06-485C-BD19-BC1A7C88182F}.Debug|Any CPU.ActiveCfg = Debug|Any CPU 15 | {797ABB25-2F06-485C-BD19-BC1A7C88182F}.Debug|Any CPU.Build.0 = Debug|Any CPU 16 | {797ABB25-2F06-485C-BD19-BC1A7C88182F}.Release|Any CPU.ActiveCfg = Release|Any CPU 17 | {797ABB25-2F06-485C-BD19-BC1A7C88182F}.Release|Any CPU.Build.0 = Release|Any CPU 18 | EndGlobalSection 19 | GlobalSection(SolutionProperties) = preSolution 20 | HideSolutionNode = FALSE 21 | EndGlobalSection 22 | EndGlobal 23 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/My Project/AssemblyInfo.vb: -------------------------------------------------------------------------------- 1 | Imports System 2 | Imports System.Reflection 3 | Imports System.Runtime.InteropServices 4 | 5 | ' General Information about an assembly is controlled through the following 6 | ' set of attributes. Change these attribute values to modify the information 7 | ' associated with an assembly. 8 | 9 | ' Review the values of the assembly attributes 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 'The following GUID is for the ID of the typelib if this project is exposed to COM 21 | 22 | 23 | ' Version information for an assembly consists of the following four values: 24 | ' 25 | ' Major Version 26 | ' Minor Version 27 | ' Build Number 28 | ' Revision 29 | ' 30 | ' You can specify all the values or you can default the Build and Revision Numbers 31 | ' by using the '*' as shown below: 32 | ' 33 | 34 | 35 | 36 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/Form1.vb: -------------------------------------------------------------------------------- 1 | Imports System.Text 2 | Imports System.Text.RegularExpressions 3 | Imports System.Threading 4 | Imports System.Net 5 | Imports System.Threading.Tasks 6 | 7 | Public Class Form1 8 | 9 | Dim ID As String 10 | 11 | Public Sub New() 12 | InitializeComponent() 13 | Control.CheckForIllegalCrossThreadCalls = False 14 | End Sub 15 | 16 | Public Sub Livecounts() 17 | lname.Text = Regex.Match(New Net.WebClient().DownloadString("https://www.youtube.com/channel/" & ID), "").Groups(1).Value 18 | Live: 19 | Using x As New WebClient 20 | x.Encoding = Encoding.UTF8 21 | lcount.Text = FormatNumber(Regex.Match(x.DownloadString("https://www.googleapis.com/youtube/v3/channels?part=statistics&id=" & ID & "&fields=items(statistics(commentCount%2CsubscriberCount%2CvideoCount%2CviewCount))&key=AIzaSyA1n4M-fo2Y5NHUj0RsvXEAis3H6_lIjRg"), """subscriberCount"": ""(.*?)"",").Groups(1).Value, 0, TriState.True) 22 | End Using 23 | GoTo Live 24 | 25 | End Sub 26 | 27 | Private Sub lname_Click(sender As Object, e As EventArgs) Handles lname.Click 28 | ID = InputBox("Insert Channel ID", "Insert Channel ID", "") 29 | If ID = Nothing Then 30 | Exit Sub 31 | End If 32 | Dim SLAYER As Task = Task.Factory.StartNew(AddressOf Livecounts) 33 | End Sub 34 | End Class 35 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/app.config: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.exe.config: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/bin/Debug/Youtube Subscribers Livecount.vshost.exe.config: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/obj/Debug/Youtube Subscribers Livecount.vbproj.FileListAbsolute.txt: -------------------------------------------------------------------------------- 1 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\bin\Debug\Youtube Subscribers Livecount.exe.config 2 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\bin\Debug\Youtube Subscribers Livecount.exe 3 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\bin\Debug\Youtube Subscribers Livecount.pdb 4 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\bin\Debug\Youtube Subscribers Livecount.xml 5 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\obj\Debug\Youtube_Subscribers_Livecount.Form1.resources 6 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\obj\Debug\Youtube_Subscribers_Livecount.Resources.resources 7 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\obj\Debug\Youtube Subscribers Livecount.vbproj.GenerateResource.Cache 8 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\obj\Debug\Youtube Subscribers Livecount.exe 9 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\obj\Debug\Youtube Subscribers Livecount.xml 10 | c:\users\iheb\documents\visual studio 2013\Projects\Youtube Subscribers Livecount\Youtube Subscribers Livecount\obj\Debug\Youtube Subscribers Livecount.pdb 11 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/My Project/Application.Designer.vb: -------------------------------------------------------------------------------- 1 | '------------------------------------------------------------------------------ 2 | ' 3 | ' This code was generated by a tool. 4 | ' Runtime Version:4.0.30319.42000 5 | ' 6 | ' Changes to this file may cause incorrect behavior and will be lost if 7 | ' the code is regenerated. 8 | ' 9 | '------------------------------------------------------------------------------ 10 | 11 | Option Strict On 12 | Option Explicit On 13 | 14 | 15 | Namespace My 16 | 17 | 'NOTE: This file is auto-generated; do not modify it directly. To make changes, 18 | ' or if you encounter build errors in this file, go to the Project Designer 19 | ' (go to Project Properties or double-click the My Project node in 20 | ' Solution Explorer), and make changes on the Application tab. 21 | ' 22 | Partial Friend Class MyApplication 23 | 24 | _ 25 | Public Sub New() 26 | MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) 27 | Me.IsSingleInstance = false 28 | Me.EnableVisualStyles = true 29 | Me.SaveMySettingsOnExit = true 30 | Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses 31 | End Sub 32 | 33 | _ 34 | Protected Overrides Sub OnCreateMainForm() 35 | Me.MainForm = Global.Youtube_Subscribers_Livecount.Form1 36 | End Sub 37 | End Class 38 | End Namespace 39 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/My Project/Resources.Designer.vb: -------------------------------------------------------------------------------- 1 | '------------------------------------------------------------------------------ 2 | ' 3 | ' This code was generated by a tool. 4 | ' Runtime Version:4.0.30319.42000 5 | ' 6 | ' Changes to this file may cause incorrect behavior and will be lost if 7 | ' the code is regenerated. 8 | ' 9 | '------------------------------------------------------------------------------ 10 | 11 | Option Strict On 12 | Option Explicit On 13 | 14 | Imports System 15 | 16 | Namespace My.Resources 17 | 18 | 'This class was auto-generated by the StronglyTypedResourceBuilder 19 | 'class via a tool like ResGen or Visual Studio. 20 | 'To add or remove a member, edit your .ResX file then rerun ResGen 21 | 'with the /str option, or rebuild your VS project. 22 | ''' 23 | ''' A strongly-typed resource class, for looking up localized strings, etc. 24 | ''' 25 | _ 29 | Friend Module Resources 30 | 31 | Private resourceMan As Global.System.Resources.ResourceManager 32 | 33 | Private resourceCulture As Global.System.Globalization.CultureInfo 34 | 35 | ''' 36 | ''' Returns the cached ResourceManager instance used by this class. 37 | ''' 38 | _ 39 | Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager 40 | Get 41 | If Object.ReferenceEquals(resourceMan, Nothing) Then 42 | Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("Youtube_Subscribers_Livecount.Resources", GetType(Resources).Assembly) 43 | resourceMan = temp 44 | End If 45 | Return resourceMan 46 | End Get 47 | End Property 48 | 49 | ''' 50 | ''' Overrides the current thread's CurrentUICulture property for all 51 | ''' resource lookups using this strongly typed resource class. 52 | ''' 53 | _ 54 | Friend Property Culture() As Global.System.Globalization.CultureInfo 55 | Get 56 | Return resourceCulture 57 | End Get 58 | Set 59 | resourceCulture = value 60 | End Set 61 | End Property 62 | End Module 63 | End Namespace 64 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/Form1.Designer.vb: -------------------------------------------------------------------------------- 1 | _ 2 | Partial Class Form1 3 | Inherits System.Windows.Forms.Form 4 | 5 | 'Form overrides dispose to clean up the component list. 6 | _ 7 | Protected Overrides Sub Dispose(ByVal disposing As Boolean) 8 | Try 9 | If disposing AndAlso components IsNot Nothing Then 10 | components.Dispose() 11 | End If 12 | Finally 13 | MyBase.Dispose(disposing) 14 | End Try 15 | End Sub 16 | 17 | 'Required by the Windows Form Designer 18 | Private components As System.ComponentModel.IContainer 19 | 20 | 'NOTE: The following procedure is required by the Windows Form Designer 21 | 'It can be modified using the Windows Form Designer. 22 | 'Do not modify it using the code editor. 23 | _ 24 | Private Sub InitializeComponent() 25 | Me.lname = New System.Windows.Forms.Label() 26 | Me.lcount = New System.Windows.Forms.Label() 27 | Me.SuspendLayout() 28 | ' 29 | 'lname 30 | ' 31 | Me.lname.Font = New System.Drawing.Font("Segoe UI", 27.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) 32 | Me.lname.Location = New System.Drawing.Point(-1, 25) 33 | Me.lname.Name = "lname" 34 | Me.lname.Size = New System.Drawing.Size(801, 64) 35 | Me.lname.TabIndex = 0 36 | Me.lname.Text = "Channel ID" 37 | Me.lname.TextAlign = System.Drawing.ContentAlignment.TopCenter 38 | ' 39 | 'lcount 40 | ' 41 | Me.lcount.Font = New System.Drawing.Font("Segoe UI", 48.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) 42 | Me.lcount.Location = New System.Drawing.Point(-1, 121) 43 | Me.lcount.Name = "lcount" 44 | Me.lcount.Size = New System.Drawing.Size(801, 91) 45 | Me.lcount.TabIndex = 1 46 | Me.lcount.Text = "0" 47 | Me.lcount.TextAlign = System.Drawing.ContentAlignment.TopCenter 48 | ' 49 | 'Form1 50 | ' 51 | Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 14.0!) 52 | Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font 53 | Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(208, Byte), Integer), CType(CType(228, Byte), Integer), CType(CType(254, Byte), Integer)) 54 | Me.ClientSize = New System.Drawing.Size(795, 274) 55 | Me.Controls.Add(Me.lcount) 56 | Me.Controls.Add(Me.lname) 57 | Me.Font = New System.Drawing.Font("Calibri", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) 58 | Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle 59 | Me.Name = "Form1" 60 | Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen 61 | Me.Text = "Youtube Subscribers Livecounts" 62 | Me.ResumeLayout(False) 63 | 64 | End Sub 65 | Friend WithEvents lname As System.Windows.Forms.Label 66 | Friend WithEvents lcount As System.Windows.Forms.Label 67 | 68 | End Class 69 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/My Project/Settings.Designer.vb: -------------------------------------------------------------------------------- 1 | '------------------------------------------------------------------------------ 2 | ' 3 | ' This code was generated by a tool. 4 | ' Runtime Version:4.0.30319.42000 5 | ' 6 | ' Changes to this file may cause incorrect behavior and will be lost if 7 | ' the code is regenerated. 8 | ' 9 | '------------------------------------------------------------------------------ 10 | 11 | Option Strict On 12 | Option Explicit On 13 | 14 | 15 | Namespace My 16 | 17 | _ 20 | Partial Friend NotInheritable Class MySettings 21 | Inherits Global.System.Configuration.ApplicationSettingsBase 22 | 23 | Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) 24 | 25 | #Region "My.Settings Auto-Save Functionality" 26 | #If _MyType = "WindowsForms" Then 27 | Private Shared addedHandler As Boolean 28 | 29 | Private Shared addedHandlerLockObject As New Object 30 | 31 | _ 32 | Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) 33 | If My.Application.SaveMySettingsOnExit Then 34 | My.Settings.Save() 35 | End If 36 | End Sub 37 | #End If 38 | #End Region 39 | 40 | Public Shared ReadOnly Property [Default]() As MySettings 41 | Get 42 | 43 | #If _MyType = "WindowsForms" Then 44 | If Not addedHandler Then 45 | SyncLock addedHandlerLockObject 46 | If Not addedHandler Then 47 | AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings 48 | addedHandler = True 49 | End If 50 | End SyncLock 51 | End If 52 | #End If 53 | Return defaultInstance 54 | End Get 55 | End Property 56 | End Class 57 | End Namespace 58 | 59 | Namespace My 60 | 61 | _ 64 | Friend Module MySettingsProperty 65 | 66 | _ 67 | Friend ReadOnly Property Settings() As Global.Youtube_Subscribers_Livecount.My.MySettings 68 | Get 69 | Return Global.Youtube_Subscribers_Livecount.My.MySettings.Default 70 | End Get 71 | End Property 72 | End Module 73 | End Namespace 74 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/Youtube Subscribers Livecount.vbproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | Debug 6 | AnyCPU 7 | {797ABB25-2F06-485C-BD19-BC1A7C88182F} 8 | WinExe 9 | Youtube_Subscribers_Livecount.My.MyApplication 10 | Youtube_Subscribers_Livecount 11 | Youtube Subscribers Livecount 12 | 512 13 | WindowsForms 14 | v4.5 15 | 16 | 17 | 18 | AnyCPU 19 | true 20 | full 21 | true 22 | true 23 | bin\Debug\ 24 | Youtube Subscribers Livecount.xml 25 | 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 26 | false 27 | 28 | 29 | AnyCPU 30 | pdbonly 31 | false 32 | true 33 | true 34 | bin\Release\ 35 | Youtube Subscribers Livecount.xml 36 | 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 37 | false 38 | 39 | 40 | On 41 | 42 | 43 | Binary 44 | 45 | 46 | Off 47 | 48 | 49 | On 50 | 51 | 52 | 53 | 54 | 55 | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | Form 72 | 73 | 74 | Form1.vb 75 | Form 76 | 77 | 78 | 79 | True 80 | Application.myapp 81 | 82 | 83 | True 84 | True 85 | Resources.resx 86 | 87 | 88 | True 89 | Settings.settings 90 | True 91 | 92 | 93 | 94 | 95 | Form1.vb 96 | 97 | 98 | VbMyResourcesResXFileCodeGenerator 99 | Resources.Designer.vb 100 | My.Resources 101 | Designer 102 | 103 | 104 | 105 | 106 | 107 | MyApplicationCodeGenerator 108 | Application.Designer.vb 109 | 110 | 111 | SettingsSingleFileGenerator 112 | My 113 | Settings.Designer.vb 114 | 115 | 116 | 117 | 124 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/My Project/Resources.resx: -------------------------------------------------------------------------------- 1 | 2 | 3 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 104 | 105 | 106 | text/microsoft-resx 107 | 108 | 109 | 2.0 110 | 111 | 112 | System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 113 | 114 | 115 | System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 116 | 117 | -------------------------------------------------------------------------------- /Youtube Subscribers Livecount/Youtube Subscribers Livecount/Form1.resx: -------------------------------------------------------------------------------- 1 | 2 | 3 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100 | 101 | 102 | 103 | 104 | 105 | 106 | 107 | 108 | 109 | text/microsoft-resx 110 | 111 | 112 | 2.0 113 | 114 | 115 | System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 116 | 117 | 118 | System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 119 | 120 | --------------------------------------------------------------------------------