Enum NetworkAvailability As Integer Other = 1 Unknown = 2 RunningFullPower = 3 Warning = 4 InTest = 5 NotApplicable = 6 PowerOff = 7 OffLine = 8 OffDuty = 9 Degraded = 10 NotInstalled = 11 InstallError = 12 PowerSaveUnknown = 13 PowerSaveLowPowerMode = 14 PowerSaveStandby = 15 PowerCycle = 16 PowerSaveWarning = 17End Enum' Returns the network availability' Requires a reference to System.Management and the respective ImportsFunction GetNetworkAvailability() As NetworkAvailability Dim mos As New ManagementObjectSearcher _ ("SELECT * FROM Win32_NetworkAdapter") Dim mo As ManagementObject For Each mo In mos.Get() Return CType(Integer.Parse(mo("Availability").ToString()), _ NetworkAvailability) NextEnd Function

4 Areas of Your Company Where Your Audio Really Matters
Your company probably relies on audio more than you realize. Whether you’re creating a spoken text message to a colleague or giving a speech, you want your audio to shine. Otherwise, you could cause avoidable friction points and potentially hurt your brand reputation. For example, let’s say you create a