Work on Editor

This commit is contained in:
Jonathan Jenne
2019-03-28 16:24:17 +01:00
parent 0eb1eeb287
commit 05f5e730e1
25 changed files with 503 additions and 198 deletions

View File

@@ -22,22 +22,9 @@ Public Class frmUserManager
Private Async Sub frmUserManager_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Await InitDataAsync()
UserRibbon.SelectPage(RibbonPageUserManager)
UserNavbar.SelectedItem = NavbarUser2Group
End Sub
Private Sub frmUserManager_VisibleChanged(sender As Object, e As EventArgs) Handles Me.VisibleChanged
If Visible Then
UserRibbon.SelectPage(RibbonPageUserManager)
End If
End Sub
Private Sub frmUserManager_Activated(sender As Object, e As EventArgs) Handles Me.Activated
If Visible Then
UserRibbon.SelectPage(RibbonPageUserManager)
End If
End Sub
Private Sub ShowUserToGroupControl()
If _UserToGroupControl Is Nothing Then
_UserToGroupControl = New UserControlAssignment() With {