dateTimePicker en VB
El control DateTimePicker permite seleccionar una fecha de manera conveniente. Cuando se accede a este objeto, muestra la fecha actual y, mediante flechas de desplazamiento que pertenecen al control, muestra calendarios que pueden recorrerse mes a mes y año a año.
Efectuando un clic sobre un número de dÃa, el control se cierra, pudiéndose extraer este dato a través de la propiedad Text o la Propiedad Value, para que se pueda utilizar a posteriori.
dateTimePicker en VB
Efectuando un clic sobre un número de dÃa, el control se cierra, pudiéndose extraer este dato a través de la propiedad Text o la Propiedad Value, para que se pueda utilizar a posteriori.
dateTimePicker en VB
Ahora un ejemplo en VB cuyo form en vista diseño con labels, DateTimePicker, botones y textbox a continuación, el primer DateTimePicker tiene nombre datetimepicker1 y no esta habilitado es solo para mostrar como cambiar formato, el segundo DateTimePicker si se utiliza mas para cálculos con los botones correspondientes y tiene nombre DTP:
Ahora la aplicación ejecutándose y el código correspondiente, el primer DateTimePicker tiene nombre datetimepicker1 y no esta habilitado es solo para mostrar como cambiar formato, el segundo DateTimePicker si se utiliza mas para cálculos con los botones correspondientes y tiene nombre DTP:
PublicClass Form1
Private Sub Button1_Click(ByValsender As System.Object, ByVal e AsSystem.EventArgs) HandlesButton1.Click
TextBox2.Text = DTP.Value.ToShortDateString
TextBox1.Text = DTP.Value.ToLongDateString
Label4.Text = "Hora formato corto es"
Label6.Text = "Hora formato largo es"
TextBox3.Text = DTP.Value.ToShortTimeString
TextBox4.Text = DTP.Value.ToLongTimeString
Label13.Text = Me.DTP.Value.Year
Label14.Text = Me.DTP.Value.Month
Label15.Text = Me.DTP.Value.Day
End Sub
Private SubForm1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
DateTimePicker1.Format = DateTimePickerFormat.Custom
DateTimePicker1.Value.ToString("yyyy/MM/dd")
Label3.Text = "La fecha de hoy "& Date.Today
Label5.Text = "La fecha y hora "& Date.Now
End Sub
Private SubButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesButton2.Click
Dim Edad As Int32
Dim Diferencia As TimeSpan
Diferencia = Today.Subtract(DTP.Value.ToShortDateString)
Edad = Fix(Diferencia.TotalDays / 365.25)
TxtDias.Text() = Diferencia.TotalDays.ToString
TxtHoras.Text() = Diferencia.TotalHours.ToString()
TxtMinutos.Text() = Diferencia.TotalMinutes
TxtEdad.Text() = Edad.ToString
Dim Fnac As Date = DTP.Value.ToShortDateString
Select CaseFnac.DayOfWeek
Case DayOfWeek.Monday
TxtDiaNac.Text = "Lunes"
Case DayOfWeek.Tuesday
TxtDiaNac.Text = "Martes"
Case DayOfWeek.Wednesday
TxtDiaNac.Text = "Mi‚rcoles"
Case DayOfWeek.Thursday
TxtDiaNac.Text = "Jueves"
Case DayOfWeek.Friday
TxtDiaNac.Text = "Viernes"
Case DayOfWeek.Saturday
TxtDiaNac.Text = "Sabado"
Case DayOfWeek.Sunday
TxtDiaNac.Text = "Domingo"
End Select
End Sub
End Class
También puedes usar
edad = Fix((DateDiff(DateInterval.Day, DateTimePicker1.Value, Now.Date)) / 365) & " años"
dateTimePicker en C#
Ahora un ejemplo en C# cuyo form en vista diseño con labels, DateTimePicker, botones y textbox a continuación, el primer DateTimePicker tiene nombre datetimepicker1 y no esta habilitado es solo para mostrar como cambiar formato, el segundo DateTimePicker si se utiliza mas para cálculos con los botones correspondientes y tiene nombre DTP:
Ahora la aplicación ejecutándose y el código correspondiente, el primer DateTimePicker tiene nombre datetimepicker1 y no esta habilitado es solo para mostrar como cambiar formato, el segundo DateTimePicker si se utiliza mas para cálculos con los botones correspondientes y tiene nombre DTP:
usingSystem;
usingSystem.Collections.Generic;
usingSystem.ComponentModel;
usingSystem.Data;
usingSystem.Drawing;
usingSystem.Linq;
usingSystem.Text;
usingSystem.Windows.Forms;
namespaceDateTimePicker_C
{
public partial class Form1 : Form
{
publicForm1()
{
InitializeComponent();
}
privatevoid Form1_Load(objectsender, EventArgs e)
{
dateTimePicker1.Format = DateTimePickerFormat.Custom;
dateTimePicker1.Value.ToString("yyyy/MM/dd");
label1.Text = "La fecha de hoy es " + System.DateTime.Today;
label2.Text = "La fecha y hora es " + System.DateTime.Now;
}
privatevoid button1_Click(objectsender, EventArgs e)
{
textBox2.Text = DTP.Value.ToShortDateString();
textBox3.Text = DTP.Value.ToLongDateString();
textBox1.Text = DTP.Value.ToShortTimeString();
textBox4.Text = DTP.Value.ToLongTimeString();
textBox7.Text=DTP.Value.Day.ToString();
textBox5.Text=DTP.Value.Month.ToString();
textBox6.Text = DTP.Value.Year.ToString();
}
privatevoid button2_Click(objectsender, EventArgs e)
{
TimeSpanDiferencia = DateTime.Today.Subtract(DTP.Value.Date);
intEdad = (int)(Diferencia.TotalDays / 365.25);
TxtDias.Text = Diferencia.TotalDays.ToString();
TxtHoras.Text = Diferencia.TotalHours.ToString();
TxtMinutos.Text = Diferencia.TotalMinutes.ToString();
TxtEdad.Text = Edad.ToString();
System.DateTimeFnac = DTP.Value.Date;
switch(Fnac.DayOfWeek)
{
case DayOfWeek.Monday:
TxtDiaNac.Text = "Lunes";
break;
caseDayOfWeek.Tuesday:
TxtDiaNac.Text = "Martes";
break;
caseDayOfWeek.Wednesday:
TxtDiaNac.Text = "Miercoles";
break;
caseDayOfWeek.Thursday:
TxtDiaNac.Text = "Jueves";
break;
caseDayOfWeek.Friday:
TxtDiaNac.Text = "Viernes";
break;
caseDayOfWeek.Saturday:
TxtDiaNac.Text = "Sabado";
break;
caseDayOfWeek.Sunday:
TxtDiaNac.Text = "Domingo";
break;
}
}
}
}
Nota: DTP.Value ya es DateTime, no necesitas convertirlo a string, si solo quieres la fecha sin tener en cuenta la hota usa DTP.Value.Date.
COMENTA LA PUBLICACION