MS_2911

app/DD-Record-Organiser/frmMain.vb

@@ -365,11 +365,6 @@ Public Class frmMain
                 btnGlobalSearch.Enabled = True
                 groupSearchAllOver.Visible = True
             End If
-            If USER_USERNAME.ToUpper = "SCHREIBERM" Or USER_USERNAME.ToUpper = "JENNEJ" Then
-                RibbonPageGroup4.Visible = True
-            Else
-                RibbonPageGroup4.Visible = False
-            End If
         Catch ex As Exception
             MsgBox("Unexpected Error in Load QuickStart-Items:" & vbNewLine & ex.Message)
         End Try
@@ -854,12 +849,6 @@ Public Class frmMain
         OpenSearchAllOVer()
 
     End Sub
-
-    Private Sub BaButtonItem24_ItemClick(sender As Object, e As ItemClickEventArgs) Handles BarButtonItem24.ItemClick
-
-        frmGoogle.Show()
-    End Sub
-
     Private Sub BarButtonItem25_ItemClick(sender As Object, e As ItemClickEventArgs) Handles bbtnItemViewsUser.ItemClick
         OpenViewsUser()
     End Sub