Visual Basic.NET - Incrementar la fecha en ciclo FOR

Hola buen dia,

Espero puedan ayudarme, estoy trabajando en VB:NET y SQL Server.

Lo que quiero hacer es, dependiendo el número que debe recorrer el FOR inserte filas pero con fechas de intervalos de 30 dias y asi consecutivamente.

Muestro como lo tengo pero aqui las tres filas que inserta me deja la fecha de hoy.


dim fecha as date

fecha = fecha.AddDays(30)

For x As Integer = 0 To 3

INSERT INTO TABLA (FECHA) VALUES ('" & fecha & "')

Next


Lo que quiero es hacer que la variable fecha por cada fila que se inserte se incremente cada 30 días.

Por el ejemplo: en la primera inserción debe poner la fecha de HOY.... En la segunda linea la fecha de hoy mas 30 dias... Y la tercera línea la fecha de la segunda linea mas 30 dias y asi consecutivamente. Espero me haya explicado bien.

24/06/2019
24/07/2019
23/08/2019

así es como quisiera que quede, pero no encuentro la forma para que lo haga asi. Les agradecere mucho el apoyo

Hola,

Veo este pregunta después de la más reciente ...

En mi respuesta a la otra pregunta, agregamos días a el DateTimePicker. Puede hacer mismo aquí. Pero, tienes que poner
fecha = fecha.AddDays(30) en la cicla :

Cuidado, corigir : DateTime y ToString.


...