Cómo comparar una cita con VB.NET

En Visual Basic.Net , la fecha tiendas de tipo de variable tanto la fecha y la hora con una precisión de menos de un milisegundo . A veces esto es difícil de recordar ya que el tipo de datos se llama simplemente una fecha. El otro escollo que hay que recordar es que el marco. Net no siempre es consistente al almacenar fechas y, a veces incluye la hora del día en que parece lógico que sólo la fecha debe ser almacenada . Afortunadamente, usted puede comparar fácilmente una cita con VB.NET , siguiendo unos sencillos pasos. Cosas que necesitará
Microsoft Visual Basic Express 2010
Visual Studio 2010 , 2008 o 2005
Ver Más instrucciones
1

Abra Visual Studio o Visual Basic Express. Crear un nuevo proyecto de formularios de Visual Basic de Windows. Haga clic en "Archivo " y luego " Nuevo". Aparecerá el " Nuevo Proyecto" ventana. Seleccione la opción " Visual Basic , Windows " de la vista de árbol , y luego elegir la opción " Proyecto de Windows Forms. " Asigne un nombre al proyecto " DateTest " y haga clic en Aceptar. Después de una corta espera , aparecerá la ventana del diseñador de formularios .
2

clic en el icono de " Herramientas " en la barra de herramientas y , a continuación, esperar a que la caja de herramientas para abrir . Arrastre un " DateTimePicker " en el formulario. Haga click en la fecha , y luego elegir la opción " Propiedades". El nombre de " dtDate , " cambiar la propiedad " Formato" para " Corto " y la propiedad "Ancho " a " 100 ". Haga clic en la tecla " Escape" para cerrar la ventana " Propiedades" .
3

Arrastre un botón desde el cuadro de herramientas al formulario. El nombre de " btnView ", y cambiar la propiedad "Texto" a "Ver ". Haga doble clic en el botón para crear un controlador de eventos y , a continuación, agregue el código siguiente al controlador :

Private Sub btnView_Click ( remitente de ByVal como System.Object , ByVal e como System.EventArgs ) Handles btnView.Click

MsgBox ( dtDate.Value.ToString )

End Sub
4

Pulse la tecla para ejecutar el programa "F5 " . Cuando aparezca el formulario , haga clic en el botón "Ver" sin cambiar la fecha . Observe cómo aparecen la fecha y la hora a pesar de que sólo la fecha apareció en el " DateTimePicker . "
5

Cierre el programa haciendo clic en la "X " en la esquina superior derecha, y luego vuelva a vista de diseño . Arrastre otro botón del cuadro de herramientas al formulario. Llame a la " btnToday " botón y cambie la propiedad Text a " Hoy". Haga doble clic en el botón "Today" para crear otro controlador de eventos y , a continuación, agregue el código siguiente : Private Sub

btnToday_Click ( remitente de ByVal como System.Object , ByVal e como System.EventArgs ) Handles btnToday.Click

msj As String = " La fecha introducida ( "

Msj & = Date.Today.ToShortDateString

msj & = " ) es"

Si dtDate.Value < Date.today Entonces

Msj & = "menor que"

ElseIf dtDate.Value = Date.today Entonces

MSG Y = "coincide"

ElseIf dtDate.Value > Date.today Entonces

msj & = "mayor que"

End If

msj & = " Hoy ( "

msj & = Date.Today.ToShortDateString

msj & = ") "

MsgBox (msg )

End Sub
6

clic "F5 " para ejecutar el programa y haga clic en el botón de "Today" cuando aparezca el formulario. Nótese cómo el mensaje que aparece dice que la fecha introducida (hoy) es mayor que la actual. Una vez más , esto es causado por el tiempo que se ha añadido por el control " DateTimePicker " . Fijar el programa cambiando las comparaciones de la siguiente manera :

Si dtDate.Value.Date < Date.today Entonces
7

clic "F5 " una vez más para iniciar la programa y, a continuación, haga clic en el botón de "Hoy " para ver que las fechas coinciden.