Friday, January 24, 2014

Convertir cadena a fecha (String to Date) en dd/MM/yyyy

Tengo una fecha en cadena

 Dim strFecha As String= "24/01/2014"



Necesito convertirla a tipo de datos Date. El siguiente pedazo de código realiza dicha conversión y valida si la cadena de entrada evidentemente es una fecha (ya que como se trata de una cadena, podría ser cualquier cosa).



 Dim fecha As Date
 Me.lblMessage.Text = String.Empty
      Try
         fecha = Date.ParseExact(dgvReserva.CurrentCell.Value, "dd/MM/yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo)

      Catch ex As FormatException
          dgvReserva.CurrentCell.Value = Now.Date.ToString("dd/MM/yyyy")
          Me.lblMessage.Text = "La fecha debe tener formato [dd/mm/yyyy]."
      Catch ex As Exception
          dgvReserva.CurrentCell.Value = Now.Date.ToString("dd/MM/yyyy")
          Me.lblMessage.Text = "La fecha debe tener formato [dd/mm/yyyy]."
      End Try

HaPPy Coding! =)