public event DashboardPopupMenuShowingEventHandler PopupMenuShowing

Public Event PopupMenuShowing As DashboardPopupMenuShowingEventHandler

using DevExpress.XtraBars;
using System.Data;
using System.Linq;
using System.Windows.Forms;

namespace DashboardSample {
    public partial class Form1 : Form {
        // Creates a new bar item.
        BarButtonItem _newBarItem;
        BarButtonItem NewBarItem {
            get {
                if (_newBarItem == null) {
                    _newBarItem = new BarButtonItem();
                    _newBarItem.Caption = "Custom Menu Item";
                    _newBarItem.ItemClick += NewItem_ItemClick;
                }
                return _newBarItem;
            }
        }
        public Form1() {
            InitializeComponent();
            dashboardDesigner1.CreateRibbon();
            dashboardDesigner1.LoadDashboard("DataFolder/nwind.xml");
        }
        private void dashboardViewer1_PopupMenuShowing(object sender, DevExpress.DashboardWin.DashboardPopupMenuShowingEventArgs e) {
            BarItemLink existingItemLink = e.Menu.ItemLinks.Where(link => link.Item == _newBarItem).FirstOrDefault();
            if (e.DashboardItemName == "pivotDashboardItem1") {
                // Inserts the item link in the Pivot's pop-up menu.
                if (existingItemLink != null)
                    e.Menu.ItemLinks.Remove(existingItemLink);
                    e.Menu.ItemLinks.Insert(0, NewBarItem);
            }
            else {
                // Removes the added link for other dashboard items.
                e.Menu.ItemLinks.Remove(existingItemLink);
            }
        }
        // Shows a message when a user clicks the Custom Menu Item in the invoked pop-up menu.
        private void NewItem_ItemClick(object sender, ItemClickEventArgs e) {
            MessageBox.Show("Custom Menu Item Clicked");
        }
    }
}

Imports DevExpress.XtraBars
Imports System.Data
Imports System.Linq
Imports System.Windows.Forms

Namespace DesignerSample
    Partial Public Class Form1
        Inherits Form
        ' Creates a new bar item.
        Private _newBarItem As BarButtonItem
        Private ReadOnly Property NewBarItem() As BarButtonItem
            Get
                If _newBarItem Is Nothing Then
                    _newBarItem = New BarButtonItem()
                    _newBarItem.Caption = "Custom Menu Item"
                    AddHandler _newBarItem.ItemClick, AddressOf NewItem_ItemClick
                End If
                Return _newBarItem
            End Get
        End Property
        Public Sub New()
            InitializeComponent()
            dashboardDesigner1.CreateRibbon()
            dashboardDesigner1.LoadDashboard("DataFolder/nwind.xml")
        End Sub
        Private Sub dashboardDesigner1_PopupMenuShowing(ByVal sender As Object, ByVal e As DevExpress.DashboardWin.DashboardPopupMenuShowingEventArgs)
            Dim existingItemLink As BarItemLink = e.Menu.ItemLinks.Where(Function(link) link.Item Is _newBarItem).FirstOrDefault()
            If e.DashboardItemName = "pivotDashboardItem1" Then
                ' Inserts the item link in the Pivot's pop-up menu.
                If existingItemLink IsNot Nothing Then
                    e.Menu.ItemLinks.Remove(existingItemLink)
                End If
                    e.Menu.ItemLinks.Insert(0, NewBarItem)
            Else
                ' Removes the added link for other dashboard items.
                e.Menu.ItemLinks.Remove(existingItemLink)
            End If
        End Sub
        ' Shows a message when a user clicks the Custom Menu Item in the invoked pop-up menu.
        Private Sub NewItem_ItemClick(ByVal sender As Object, ByVal e As ItemClickEventArgs)
            MessageBox.Show("Custom Menu Item Clicked")
        End Sub
    End Class
End Namespace

dashboardViewer.PopupMenuShowing += DashboardViewer_PopupMenuShowing;
dashboardViewer.MasterFilterSet += DashboardViewer_MasterFilterSet;

AddHandler dashboardViewer.PopupMenuShowing, AddressOf DashboardViewer_PopupMenuShowing
AddHandler dashboardViewer.MasterFilterSet, AddressOf DashboardViewer_MasterFilterSet