Partial Class BusinessDirectory_VC _ Public Sub New(ByVal Container As System.ComponentModel.IContainer) MyClass.New() 'Required for Windows.Forms Class Composition Designer support Container.Add(Me) End Sub 'Component overrides dispose to clean up the component list. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) If disposing AndAlso components IsNot Nothing Then components.Dispose() End If MyBase.Dispose(disposing) End Sub 'Required by the Component Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Component Designer 'It can be modified using the Component Designer. 'Do not modify it using the code editor. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Me.aOpenDashboardforView = New DevExpress.ExpressApp.Actions.SimpleAction(Me.components) ' 'aOpenDashboardforView ' Me.aOpenDashboardforView.Caption = "aOpen Dashboardfor View" Me.aOpenDashboardforView.ConfirmationMessage = Nothing Me.aOpenDashboardforView.Id = "aOpenDashboardforView" Me.aOpenDashboardforView.TargetObjectType = GetType(Nuvolar.[Module].BusinessDirectory) Me.aOpenDashboardforView.TargetViewNesting = DevExpress.ExpressApp.Nesting.Root Me.aOpenDashboardforView.TargetViewType = DevExpress.ExpressApp.ViewType.ListView Me.aOpenDashboardforView.ToolTip = Nothing Me.aOpenDashboardforView.TypeOfView = GetType(DevExpress.ExpressApp.ListView) End Sub Friend WithEvents aOpenDashboardforView As DevExpress.ExpressApp.Actions.SimpleAction End Class