VB.NET adicionar meses apatir de uma data

[Otaku_]

eu tenho um formulario onde eu entro com valores de um comboBox 2 textBox e um maskedTextBox(que exibe a data)

e um datagridView que exibe esses valores sempre adicionando um mes a data

so que ele começa apartido do mes seguinte ao que esta no maskedtextbox

por exemplo

data do masked -> 26/01/2013

data no datagrid -> 26/02/2013 -> 26/03/2013 -> 26/04/2013

meu codigo

Dim val, valp As Decimal
        Dim n As Integer
        Dim vencimento As DateTime = DateTime.Now
        Dim mes As Integer = 1

        Try
            val = txtVal.Text
            n = txtN.Text
            valp = (val / n).ToString("N2")
            vencimento = mskdata.Text

           

            For i = 1 To n

                vencimento = vencimento.AddMonths(mes)

                dtvParcelas.Rows.Add(cbLoja.Text, i, vencimento.ToShortDateString, valp)
            Next

            Return False
        Catch ex As Exception

        End Try
        Return True

[Otaku_]

já consegui resolver