Imports System.Collections.ObjectModel Imports System.IO Imports EgtUILib Imports EgtWPFLib5 Public Class ModifyQualityVM Inherits VMBase Private m_Title As String = String.Empty Public Property Title As String Get Return m_Title End Get Set(value As String) m_Title = value End Set End Property Public ReadOnly Property ValueMsg As String Get Return EgtMsg(MSG_SPLITPAGEUC + 35) End Get End Property Public ReadOnly Property OkMsg As String Get Return EgtMsg(91651) 'Ok End Get End Property Public ReadOnly Property ExitMsg As String Get Return EgtMsg(91652) 'Annulla End Get End Property Private m_QualityList As New ObservableCollection(Of String) Public Property QualityList As ObservableCollection(Of String) Get Return m_QualityList End Get Set(value As ObservableCollection(Of String)) m_QualityList = value End Set End Property Private m_SelectedQuality As String Public Property SelectedQuality As String Get Return m_SelectedQuality End Get Set(value As String) m_SelectedQuality = value End Set End Property Sub New() End Sub End Class