Imports System Imports System.ComponentModel Imports System.Collections.Generic Imports System.Diagnostics Imports System.Text Imports DevExpress.ExpressApp Imports DevExpress.ExpressApp.Actions Imports DevExpress.Persistent.Base Imports DevExpress.ExpressApp.ConditionalAppearance Public Class AppearanceVC Inherits DevExpress.ExpressApp.ViewController Private _AppearanceController As AppearanceController Public Sub New() MyBase.New() 'This call is required by the Component Designer. InitializeComponent() RegisterActions(components) End Sub Protected Overrides Sub OnActivated() MyBase.OnActivated() '_AppearanceController = Frame.GetController(Of AppearanceController)() 'If _AppearanceController IsNot Nothing Then ' AddHandler _AppearanceController.AppearanceApplied, AddressOf _AppearanceController_AppearanceApplied 'End If End Sub Protected Overrides Sub OnDeactivated() MyBase.OnDeactivated() '_AppearanceController = Frame.GetController(Of AppearanceController)() 'If _AppearanceController IsNot Nothing Then ' RemoveHandler _AppearanceController.AppearanceApplied, AddressOf _AppearanceController_AppearanceApplied 'End If End Sub Private Sub _AppearanceController_AppearanceApplied(sender As Object, e As ApplyAppearanceEventArgs) End Sub End Class