Generar rango de fechas en DataGridView

[vidalsoft]

Bueno intentando lo logre... pero no seria malo que posteen otra forma de hacerlo.

Private Sub btnGenerar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGenerar.Click
Dim d As Integer, i As Integer, f As Date
dgvDetalle.Rows.Clear()
f = dtpInicial.Text
d = DateDiff("d", f, dtpFinal.Text) + 1
For i = 1 To d
dgvDetalle.Rows.Add(i, f) ' agrega en la columna(0) el numero de iteraciones y en la columna(1) agrega las fechas consecutivas..
f = DateAdd("d", 1, f)
Next i
End Sub