怎么把2007－01－18转化为18JAN07

如何把2007－01－18转化为18JAN07
如何把2007－01－18转化为18JAN07

------解决方案--------------------
Dim j As String
Dim i As String = "2007-01-18 "
If "01 ".Equals(i.Substring(5, 2)) Then
j = "JAN "
End If
i = i.Substring(8, 2) & j & i.Substring(2, 2)
------解决方案--------------------
Dim dt1 As Date = Date.ParseExact( "2007－01－18 ", "yyyy－MM－dd ", New System.Globalization.CultureInfo( "en-US "))
Dim str As String = dt1.ToString( "ddMMMyy ", New System.Globalization.CultureInfo( "en-US "))