none
VB.NET adicionar meses apatir de uma data RRS feed

  • Pergunta

  • Olá! estou com o seguinte problema


    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



    sábado, 26 de janeiro de 2013 19:28

Respostas

Todas as Respostas