[VB] rovesciare una stringa

[ladyBlu]

prova così:

Dim miaData As String
Dim mioMese, mioGiorno, mioAnno As String

miaData = Replace(Trim(DateTimePicker1.Text), "/", "")

mioGiorno = Microsoft.VisualBasic.Left(miaData, 2)
mioMese = Microsoft.VisualBasic.Mid(miaData, 3, 2)
mioAnno = Microsoft.VisualBasic.Mid(miaData, 5, 4)

miaData = mioAnno & mioMese & mioGiorno

TextBox2.Text = miaData