Find Device Plugged In Or Not

    Public Shared Function Populate_list() As Integer
        Dim searcher As New ManagementObjectSearcher("SELECT Name FROM  Win32_pnpentity where Name like 'Concel%'")
        Return searcher.Get().Count
    End Function
 



If Store.Populate_list() = 0 Then
            MsgBox("Diacorder Not Connected Properly." & vbCrLf & "Connect It Properly and Then Proceed Further.")
            Return
        End If
        If funcs.CheckIfRunning("Diacorder") = True Then funcs.KillProcess("Diacorder")