Public Class TopPanelButton1V #Region "FIELDS & PROPERTIES" Private m_SceneButtonVM As SceneButtonVM #End Region ' Fields & Properties #Region "CONSTRUCTOR" Sub New() ' La chiamata è richiesta dalla finestra di progettazione. InitializeComponent() ' Aggiungere le eventuali istruzioni di inizializzazione dopo la chiamata a InitializeComponent(). m_SceneButtonVM = Map.refSceneButtonVM Me.DataContext = m_SceneButtonVM.TopPanelListGroupBtn(SceneButtonVM.m_nIndexList_2) SceneButtonVM.m_nIndexList_2 += 1 End Sub #End Region ' Constructor End Class