Utilizamos cookies propias y de terceros. Al navegar entendemos que aceptas el uso de cookies. +Info.
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Usuario
· Wiki

Proyecto AjpdSoft: Foros

AjpdSoft :: Ver tema - Convertir fecha y hora en HH:MM (horas minutos) VB.Net
Foros de discusión Buscar Perfil FAQ Iniciar sesión
Information Convertir fecha y hora en HH:MM (horas minutos) VB.Net

Publicar nuevo tema Responder al tema
Foros de discusión » VB.Net, C# .Net, Visual Studio .Net   
Ver tema anterior :: Ver tema siguiente
AutorMensaje
varios
Magnífico usuario


Registrado: Oct 10, 2006
Mensajes: 2092

Asunto: Convertir fecha y hora en HH:MM (horas minutos) VB.Net Responder citando

¿Cómo puedo hacer una función que convierta una fecha y hora (Date) a formato HH:MM? quiero sacar la hora y los minutos en formato HH:MM de una fecha dada.

Y en caso de una hora o minuto de un dígito 9:34 quiero que devuelva 09:34 ¿cómo se puede hacer una función en Visual Basic .Net 2010 para hacer esta conversión?
MensajePublicado:
Mie Mar 09, 2011 6:48 pm
Top of PageVer perfil de usuario
alonsojpd
Administrador/Moderador


Registrado: Sep 16, 2003
Mensajes: 2687

Asunto: Re: Convertir fecha y hora en HH:MM (horas minutos) VB.Net Responder citando



Anuncios



varios escribió:
¿Cómo puedo hacer una función que convierta una fecha y hora (Date) a formato HH:MM? quiero sacar la hora y los minutos en formato HH:MM de una fecha dada.

Y en caso de una hora o minuto de un dígito 9:34 quiero que devuelva 09:34 ¿cómo se puede hacer una función en Visual Basic .Net 2010 para hacer esta conversión?


Puedes usar esta función, no es la mejor pero seguramente te sirva:

Código:

    Function obtenerHoraMinuto(ByVal fecha As Date) As String
        Dim horaMinuto As String = "00:00"
        Dim hora As String = "00"
        Dim minuto As String = "00"

        If Len(Trim(Str(fecha.Hour))) = 1 Then
            hora = "0" & fecha.Hour
        Else
            hora = fecha.Hour
        End If
        If Len(Trim(Str(fecha.Minute))) = 1 Then
            minuto = "0" & fecha.Minute
        Else
            minuto = fecha.Minute
        End If

        horaMinuto = hora & ":" & minuto

        obtenerHoraMinuto = horaMinuto
    End Function


Un ejemplo de uso:

Código:

        Dim fecha As Date = Now()

        fecha = DateTime.Now

        txtDesdeDia.Value = fecha
        txtHastaDia.Value = fecha
        txtDesdeHora.Text = obtenerHoraMinuto(fecha)
        fecha = fecha.AddMinutes(30)
        txtHastaHora.Text = obtenerHoraMinuto(fecha)
MensajePublicado:
Mie Mar 09, 2011 6:50 pm
Top of PageVer perfil de usuario
Mostrar mensajes de anteriores:   
Todas las horas son GMT - 1 Horas
Publicar nuevo tema Responder al tema
Foros de discusión » VB.Net, C# .Net, Visual Studio .Net  

Cambiar a:  
Key
  Puede publicar nuevos temas en este foro
No puede responder a temas en este foro
No puede editar sus mensajes en este foro
No puede borrar sus mensajes en este foro
No puede votar en encuestas en este foro
Este sitio web NO CONTIENE malware, todos los programas con código fuente aquí. Autor: Alonso Javier Pérez Díaz Google+ Síguenos en Google+