Ver originalPrivate 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