coloquei na area de tranferencia um exemplinho ver se é isso mesmo q vc quer, o exemplo ta na area de VB e se chama korn_parcelas, o codigo fonte ta aí em baixo se preferir....ah! nao usei o listview useu o MSHFlexGrid....

 

Private Sub Form_Load()
Me.Text1.Text = Date
Me.MSHFlexGrid1.Clear
Me.MSHFlexGrid1.Rows = 0

End Sub

 

Private Sub Text2_Change()
  Dim Dia, Mes, Ano, Linhas As Integer

10    Dia = Day(Text1.Text)
20    Mes = Month(Text1.Text)
30    Ano = Year(Text1.Text)
40    Linhas = Val(Text2.Text)
50
60      With Me
70        If Linhas > 0 Then
80           .MSHFlexGrid1.Clear
90           .MSHFlexGrid1.ColWidth(0) = 3500
100          .MSHFlexGrid1.ColWidth(1) = 2500
110             For i = 1 To Linhas
120               .MSHFlexGrid1.Rows = i
130                  If Mes = 13 Then 'calma ainda nao é 12/DEZEMBRO
140                     Ano = Ano + 1 'se 12 DEZEMBRO, VIRA O ANO,  e o mes começa em UM/janeiro
150                     Mes = 1
160                  End If
170                    .MSHFlexGrid1.TextMatrix(i - 1, 0) = "Vencimento " & i & " será em : " & Format(Dia, "0#") & "/" & Format(Mes, "0#") & "/" & Format(Ano, "####")
180                    Mes = Mes + 1 'aumenta UM mes
190             Next i
200         Else
               'colocar no load do form tambem, assim comeca sem linhas
210           .MSHFlexGrid1.Clear
220           .MSHFlexGrid1.Rows = 0
230         End If
240      End With

End Sub

nao achei la na area de transferencia , qual o link irmao?

mas no caso esses txts estariam dentro do formulario onde esta o listview o Text1 seria acho eu o campo onde ponho a data , eo Text2 onde eu ponho o numero de parcelas , mas acontece que esses dois txts estao em outro form o lisview so mostra os registros que tem produtos parcelados , os ourtos produtos que nao sao parcelados nao sao exibidos nele , mas isso ja esta fazendo de boa , oq nao faz é aparecer parcelas nele dependendo a quantidade que eu digito no txt

o linh é esse http://www.vbweb.com.br/transfer.asp?command=Download&folder=C:domainsvbweb.com.brpublicVB&file=Korn_parcelas.zip

 

como disse nao usei o listview usei o mshflesgrid como pode obsevar na msg anterior, e acredito que vc possa adaptar o exemplo a seu gosto.....

.

Tá aí, basta fazer as adaptações para o seu caso:

 

'GERANDO MENSALIDADES:
Private Sub cmdgeramensalidades_Click()
Dim mes As Integer
Dim ano As Integer
Dim data As String

mes = Format(Now, "mm")
ano = Format(Now, "yy")

For i = 1 To Val(txtnumeroparcelas.Text)
    mes = mes + 1
    If mes > 12 Then
       mes = 1
       ano = ano + 1
   End If
  dia1 = Format(Now, "dd")
  dia = Verifica_dia(dia1, mes)
  data = dia & "/" & Format(mes, "00") & "/" & Format(ano, "0000")
  parcela = CCur(txtvalor.Text) / Val(txtnumeroparcelas.Text)
  Data2.Recordset.AddNew
  Data2.Recordset.Fields(1) = CLng(txtcodigo.Text)
  Data2.Recordset.Fields(2) = Format(CDate(data), "dd/mm/yyyy")
  Data2.Recordset.Fields(3) = CCur(parcela)
  Data2.Recordset.Fields(4) = False
  Data2.Recordset.Update
Next
End Sub

'FUNÇÃO PARA CONTROLE DO DIA DO VENCIMENTO:-----------------
'Nota: No VB 6 o primeiro índice de um array é igual a zero,
'assim : diasDoMes(0) é igual a 31 , etc.. É por isto que eu
'subtraio 1 do mês atual (mes de janeiro) - 1 = 0). ---------

'MÊS DE FEVEREIRO: Se o ano for divisível por 4, então será bissexto
'com 29 dias no mês; caso contrário, terá apenas 28 dias..

Public Function Verifica_dia(dia, mes)
Dim diasDoMes As Variant

dia = Val(dia)
diasDoMes = Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31) 'jan, fev...

If dia = 31 Then
Verifica_dia = diasDoMes(mes - 1)
Else
Verifica_dia = dia
End If

End Function