Imports DevExpress.XtraGrid Imports DevExpress.XtraGrid.Views.Base Imports DevExpress.XtraGrid.Registrator Namespace LookupGrid Public Class LookupGridControl Inherits GridControl Protected Overrides Function CreateDefaultView() As BaseView Return CreateView("LookupGridView") End Function Protected Overrides Sub RegisterAvailableViewsCore(ByVal collection As InfoCollection) MyBase.RegisterAvailableViewsCore(collection) collection.Add(New GridViewInfoRegistrator()) End Sub End Class End Namespace