establecer fecha dinamica a dateTimePicker

[josiasdaniel_]

Saludos amigos foristas, escribo en esta ocación para solicitar su ayuda sobre como establecer una fecha adelantada a un control dateTimepicker.

Es decir si el dia actual es 22/06/2011 al cargarse el form en el control deseo que aparezca por defecto 23/06/2011 y si el dia fuera 30/06/2011 deberia cargarse en el control 01/07/2011. Si alguien pudiera indicarme la forma de realizar dicha operación le agradeceria muchisimo, estoy utilizando vb.net. Muchas gracias a los colaboradores.

[Aquaventus]

Hola josiasdaniel_ prueba con esto :

Código vb.net:

Private Sub TuForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        DateTimePicker1.Value = Today
        DateTimePicker1.Value = DateTimePicker1.Value.Add(TimeSpan.FromDays(1))
End Sub
 

Saludos!.

[Totto3]

o tambien puedes probar con esto :

DateTimePicker1.Value = DateAdd(DateInterval.Day, 1, Now).ToShortDateString

[Aquaventus]

Codigo reducido :

Código vb.net:

Private Sub TuForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        DateTimePicker1.Value = Today.Add(TimeSpan.FromDays(1))
End Sub
 

Saludos!.

[josiasdaniel_]

Muchas gracias a los colaboradores, por sus aportes ya los estoy probando. Para los que siguen este tema tambien voy a aportar una solución que encontre probando con vb.net:

DateTimePicker1.Value = Now.AddDays(1)

[josiasdaniel_]

Estas opciones tienen la propiedad de poner la hora a las 12:00 AM del dia que estamos estableciendo

Código vb:

Private Sub TuForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            DateTimePicker1.Value = Today
            DateTimePicker1.Value = DateTimePicker1.Value.Add(TimeSpan.FromDays(1))
    End Sub
 

Código vb:

Private Sub TuForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            DateTimePicker1.Value = Today.Add(TimeSpan.FromDays(1))
    End Sub
 

Código vb:

DateTimePicker1.Value = DateAdd(DateInterval.Day, 1, Now).ToShortDateString
 

Mientras que la siguiente opción establece solo la fecha y coloca la hora actual del sistema:

Código vb:

DateTimePicker1.Value = Now.AddDays(1)
 

Muchisimas gracias a los colaboradores del foro...