Nicola Pievani
18 lines
722 B
VB.net
18 lines
722 B
VB.net
Imports System.IO
|
|
|
|
Public Class PathConverter
|
|
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 Local_AsseblyName As AssemblyName = DirectCast(value, AssemblyName)
|
|
Dim sPath As String = Local_AsseblyName.Name
|
|
Return Path.GetFileNameWithoutExtension(sPath)
|
|
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
|
|
|