Imports System.Windows.Threading Imports EgtWPFLib5 Imports EgtUILib Imports System.Collections.ObjectModel Imports System.IO Imports System.Globalization Public Class ProjectVM Inherits VMBase #Region "FIELDS & PROPERTIES" #End Region ' FIELDS & PROPERTIES #Region "CONSTRUCTOR" Sub New() ' Creo riferimento a questa classe in Map Map.SetRefProjectVM(Me) End Sub #End Region ' CONSTRUCTOR #Region "METHODS" #End Region ' METHODS End Class Public Class VisibilityToRowConverter Implements IValueConverter Public Function Convert(ByVal value As Object, ByVal targetType As Type, ByVal parameter As Object, ByVal culture As CultureInfo) As Object Implements IValueConverter.Convert If IsNothing(value) Then Return 2 Return If(value = Visibility.Visible, 1, 2) End Function Public Function ConvertBack(ByVal value As Object, ByVal targetType As Type, ByVal parameter As Object, ByVal culture As CultureInfo) As Object Implements IValueConverter.ConvertBack Throw New System.NotImplementedException() End Function End Class