Converter String para Decimal

[Cega86 0]

Boa tarde, estou desenvolvendo uma rotina em que recebo o valor "0000000249748" gostaria de converte-lo para decimal.

 

Estou usando: Format(Convert.ToDecimal("0000000249748"), "##,##0.00")

ele me retorna o valor 249.748,00 quando o certo seria retornar 2.497,48.

Como faço para retornar o valor certo?

[Altevir 0]

Opaaaa

ve se isso ajuda !!??

        Dim vValor As String
        vValor = Val((Mid(TextBox1.Text, 1, Len(TextBox1.Text) - 2) & "." & Strings.Right(TextBox1.Text, 2)))
        vValor = Format(CDbl(vValor), "0.00")
        MsgBox(vValor.ToString) = 2497,48