Valores negativos

Olá pessoal!

Estou iniciando em VB.NET e fiz um programa, que esta rodando certinho, mas o resultado sai negativo. Veja o codigo abaixo:

Public Class ModVF
Private decValorInicial As Double = 0
Private dbTaxaAnual As Double = 0
Private decDepositoMensal As Double = 0
Private iAnos As Integer = 0
Private resultado As Double = 0
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Height = 404
decValorInicial = CDbl(TextBox1.Text)
dbTaxaAnual = CDbl(TextBox2.Text)
decDepositoMensal = CDbl(TextBox3.Text)
iAnos = CInt(TextBox4.Text)
resultado = FV(dbTaxaAnual, iAnos, decDepositoMensal, decValorInicial)
TextBox5.Visible = True
Label6.Visible = True
TextBox5.Text = "Com um valor inicial de " & FormatCurrency(decValorInicial) & vbCrLf
TextBox5.Text += "e depósitos mensais de " & FormatCurrency(decDepositoMensal) & vbCrLf
TextBox5.Text += "por um período de " & iAnos & " anos" & vbCrLf
TextBox5.Text += "a uma taxa de " & dbTaxaAnual & "% no período," & vbCrLf
TextBox5.Text += "Você terá economizado " & vbCrLf & FormatCurrency(resultado)
End Sub
End Class
na variavel resultado uso a função FormatCurrency() e quando o valor é negativo ele coloca () no resultado. Veja um resultado:

Com um valor inicial de R$ 1.000,00

e depósitos mensais de R$ 100,00

por um período de 11 anos

a uma taxa de 6% no período,

Você terá economizado

(R$ 2.010.282.188.700,00)

quem puder ajudar agradeço!!!