Nicola Pievani
18 lines
773 B
VB.net
18 lines
773 B
VB.net
Public Class BooleanToVisibilityConverter
|
|
Implements IValueConverter
|
|
|
|
Public Function Convert(value As Object, targetType As Type, parameter As Object, culture As System.Globalization.CultureInfo) As Object Implements IValueConverter.Convert
|
|
Dim VisbibilityBottom As Visibility = Visibility.Hidden
|
|
If CBool(value) Then
|
|
VisbibilityBottom = Visibility.Visible
|
|
Else
|
|
VisbibilityBottom = Visibility.Hidden
|
|
End If
|
|
Return VisbibilityBottom
|
|
End Function
|
|
|
|
Public Function ConvertBack(value As Object, targetType As Type, parameter As Object, culture As System.Globalization.CultureInfo) As Object Implements IValueConverter.ConvertBack
|
|
Throw New NotImplementedException
|
|
End Function
|
|
|
|
End Class |