<DllImport("shell32.dll", EntryPoint:="IsUserAnAdmin")> Public Shared Function IsUserAnAdmin() As Boolean
End Function
If IsUserAnAdmin = False Then
MessageBox.Show("Not a Admin")
ElseIf IsUserAnAdmin = True Then
MessageBox.Show("User is Admin")
End If