Programación General > Visual Basic 6.0 e inferiores

 Re: Convertir datos de una tabla en Access

(1/1)

Jorge López:
Convertir datos de una tabla

Hoola a todos ....espero que esten bien....

Mi pregunta es la siguiente:

Tengo una tabla con campos de horarios, los mismos estan en formato 2:30 pm ó am, lo que quiero es que mediante un formulario, programar un boton que cuando le haga click, este me los convierta en hora militar(14:30) y le quite las extensiones de am y pm,quiero que en la tabla solo aparescan valores en hora militar sin las asignaciones de am y pm...



por favor si alguien tiene idea ó algun codigo mi correo es:
jorge20l@mipunto.com
msn jorge20l@hotmail.com

Jose Arriagada:
Utiliza la siguiente funcion:

Public Function HoraMilitar(ByVal xHora As String) As String
xHora = UCase(xHora)
largo = Len(xHora)
pos1 = InStr(xHora, ":")
laHora = CInt(Mid(xHora, 1, pos1 - 1))
pos2 = InStr(xHora, " ")
LosMinutos = CInt(Trim(Mid(xHora, pos1 + 1, pos2 - pos1)))
pos3 = InStr(xHora, "P")
If pos3 > 0 Then
    If laHora <> 12 Then
        laHora = laHora + 12
    End If
End If
HoraMilitar = Format(laHora, "00") & ":" & Format(LosMinutos, "00")
End Function

Jorge López:
Gracias..
la voy a probar a ver que tal...
cualquier cosa..lo escribo aca en este foro........SALUDOS Y GRACIAS

Jorge López:
ayyyyyy.....una ultima cosa...si la base de datos sse llama BASE y la tabla se llama Horarios,¿ Como Hago referencia a los campos que quiero cambiar?

Navegación

[0] Índice de Mensajes