Click here to Skip to main content
Click here to Skip to main content
Articles » Languages » VB.NET » Hardware » Downloads
 
Add your own
alternative version

Sound Scanner and FFT Analyzer

, 16 Feb 2010 CDDL
Scanning analog input, and FFT convertion and analyzing.
SoundScan.zip
SoundScan
bin
Debug
ICO_FKR.ico
SoundAnalysis.dll
ICO_FKR.ico
My Project
Application.myapp
Settings.settings
PORT.DLL
SoundAnalysis.dll
SoundScan_Feb112010.zip
SoundScan
bin
Debug
ICO_FKR.ico
SoundAnalysis.dll
SoundScan.exe
SoundScan.pdb
SoundScan.vshost.exe
ICO_FKR.ico
My Project
Application.myapp
Settings.settings
obj
Debug
ResolveAssemblyReference.cache
SoundScan.exe
SoundScan.Frm_Detailed.resources
SoundScan.Frm_SoundScan.resources
SoundScan.pdb
SoundScan.Resources.resources
SoundScan.vbproj.GenerateResource.Cache
TempPE
PORT.DLL
SoundAnalysis.dll
SoundScan_Feb132010.zip
ICO_FKR.ico
SoundAnalysis.dll
SoundScan.exe
SoundScan.pdb
SoundScan.vshost.exe
ICO_FKR.ico
Application.myapp
Settings.settings
ResolveAssemblyReference.cache
SoundScan.exe
SoundScan.Frm_Detailed.resources
SoundScan.Frm_SoundScan.resources
SoundScan.pdb
SoundScan.Resources.resources
SoundScan.vbproj.GenerateResource.Cache
PORT.DLL
SoundAnalysis.dll
SoundScan.suo
'------------------------------------------------------------------------------
' <auto-generated>
'     This code was generated by a tool.
'     Runtime Version:2.0.50727.1433
'
'     Changes to this file may cause incorrect behavior and will be lost if
'     the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict On
Option Explicit On


Namespace My

    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "8.0.0.0"),  _
     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
    Partial Friend NotInheritable Class MySettings
        Inherits Global.System.Configuration.ApplicationSettingsBase
        
        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
        
#Region "My.Settings Auto-Save Functionality"
#If _MyType = "WindowsForms" Then
        Private Shared addedHandler As Boolean

        Private Shared addedHandlerLockObject As New Object

        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
        Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
            If My.Application.SaveMySettingsOnExit Then
                My.Settings.Save()
            End If
        End Sub
#End If
#End Region
        
        Public Shared ReadOnly Property [Default]() As MySettings
            Get
                
#If _MyType = "WindowsForms" Then
                   If Not addedHandler Then
                        SyncLock addedHandlerLockObject
                            If Not addedHandler Then
                                AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
                                addedHandler = True
                            End If
                        End SyncLock
                    End If
#End If
                Return defaultInstance
            End Get
        End Property
    End Class
End Namespace

Namespace My
    
    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
    Friend Module MySettingsProperty
        
        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
        Friend ReadOnly Property Settings() As Global.SoundScan.My.MySettings
            Get
                Return Global.SoundScan.My.MySettings.Default
            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 Common Development and Distribution License (CDDL)

Share

About the Author

Mahdi Mansouri
Engineer
Malaysia Malaysia
PhD Candidate in Biomedical Eng., Control
M.Eng Electronics, Control
B.Eng Computer, Hardware
That's all ;D !

| Advertise | Privacy | Terms of Use | Mobile
Web03 | 2.8.141223.1 | Last Updated 16 Feb 2010
Article Copyright 2010 by Mahdi Mansouri
Everything else Copyright © CodeProject, 1999-2014
Layout: fixed | fluid