Public Class DispositionOpListBoxItem
   Inherits OperationListBoxItem

   Private m_Image As String = String.Empty
   Public Property Image As String
      Get
         Return m_Image
      End Get
      Set(value As String)
         m_Image = value
      End Set
   End Property

   Sub New(nId As Integer, sName As String, nType As Integer)
      m_Id = nId
      Me.Name = sName
      m_Type = nType
   End Sub

End Class