Add First Pass of UserManager

EDMI_ClientSuite/frmMain.vb

@@ -118,8 +118,6 @@ Public Class frmMain
         Dim frm As New frmEntityDesigner()
         frm.MdiParent = DocumentManager.MdiParent
         frm.Show()
-
-        RibbonPageCategoryEntityDesigner.Visible = True
     End Sub
 
     Private Sub BarButtonConnectionSettings_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonConnectionSettings.ItemClick
@@ -149,4 +147,10 @@ Public Class frmMain
 
         oLicense2 = oLicenseFile.LoadFile()
     End Sub
+
+    Private Sub BarButtonUserManager_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonUserManager.ItemClick
+        Dim oForm As New frmUserManager()
+        oForm.MdiParent = DocumentManager.MdiParent
+        oForm.Show()
+    End Sub
 End Class