Enum DomainRole As Integer StandaloneWorkstation = 0 MemberWorkstation = 1 StandaloneServer = 2 MemberServer = 3 BackupDomainController = 4 PrimaryDomainController = 5End Enum' Returns the domain role' Requires a reference to System.Management and the respective ImportsFunction GetDomainRole() As DomainRole Dim mos As New ManagementObjectSearcher _ ("SELECT * FROM Win32_ComputerSystem") Dim mo As ManagementObject For Each mo In mos.Get() Return CType(Integer.Parse(mo("DomainRole").ToString()), DomainRole) NextEnd Function


The Best Mechanical Keyboards For Programmers: Where To Find Them
When it comes to programming, a good mechanical keyboard can make all the difference. Naturally, you would want one of the best mechanical keyboards for programmers. But with so many