[n_way]

Imam jedan problemček, trebo bih iz datuma koji je u obliku npr. "12.11.2005 17:15:46" dobiti "121105_171546". Napiso sam kod koji radi baš to, ali ima dosta varijabli i javlja se problem ako je datum oblika npr. "4.11.2005 6:11:23"

Dal itko ima neku ideju kako bi se to moglo riješiti?

Dim sDate As String = "12.11.2005 17:15:46"

Dim var1 As String = Microsoft.VisualBasic.Left$(sDate, 2)
Dim var2 As String = Microsoft.VisualBasic.Left$(Microsoft.VisualBasic.Mid$(sDate, 4), 2)
Dim var3 As String = Microsoft.VisualBasic.Left$(Microsoft.VisualBasic.Mid$(sDate, 9), 2)
Dim var4 As String = Microsoft.VisualBasic.Left$(Microsoft.VisualBasic.Mid$(sDate, 12), 2)
Dim var5 As String = Microsoft.VisualBasic.Left$(Microsoft.VisualBasic.Mid$(sDate, 15), 2)
Dim var6 As String = Microsoft.VisualBasic.Right$(sDate, 2)

Label1.Text = var1 & var2 & var3 & "_" & var4 & var5 & var6