MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Validar Horas em caixa de texto

    avatar
    Leticia.*-*
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/12/2012

    [Resolvido]Validar Horas em caixa de texto Empty Validar Horas em caixa de texto

    Mensagem  Leticia.*-* 23/1/2013, 22:12

    Boa noite!
    Como faço para validar uma Qtde de horas inserida em uma caixa de texto ?

    Tenho uma caixa de texto com a mascara de entrada 00:00;0;_

    mas se o usuario digitar por exemplo 1:60 (O que deveria ser 2:00) ele nao da erro i pior o campo vai vazio pra tabela .

    COmo faco para no evento lostfocus da caixa verificar a hora informada ?

    avatar
    Convidado
    Convidado


    [Resolvido]Validar Horas em caixa de texto Empty Re: [Resolvido]Validar Horas em caixa de texto

    Mensagem  Convidado 24/1/2013, 02:54

    Podes colocar no evento ao ocorrer erro do form:


    Private Sub Form_Error(DataErr As Integer, Response As Integer)
    Response = acDataErrContinue 'inibe msg padrão do access.
    MsgBox "O valor que você digitou não é válido para este campo ! ", vbCritical, "Atenção"
    End Sub


    Após a msgBox pode executar algum tipo de ação.. tipo Me.undo ou Me.SuaCaixa = ""

    é por ai.

    Cumprimentos.
    avatar
    Leticia.*-*
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/12/2012

    [Resolvido]Validar Horas em caixa de texto Empty Re: [Resolvido]Validar Horas em caixa de texto

    Mensagem  Leticia.*-* 25/1/2013, 00:49

    Ola Piloto!

    Meu problema é justamente esse , Nao esta ocorrendo o erro ou seja se eu colocar 01:75 o campo aceita mas na tabela fica em brancoja se eu coloco uma hora valida tipo 01:45 ai sim o banco recebe a informacao inserida pelo usuario.

    avatar
    Convidado
    Convidado


    [Resolvido]Validar Horas em caixa de texto Empty Re: [Resolvido]Validar Horas em caixa de texto

    Mensagem  Convidado 25/1/2013, 02:30

    Private Sub Texto16_AfterUpdate()
    If Right(Me.Texto16, 2) > 60 Then
    MsgBox "Minútos inválidos", vbCritical, "ERRO"
    Me.Texto16 = ""
    End If
    End Sub



    Cumprimentos.
    avatar
    Leticia.*-*
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 63
    Registrado : 02/12/2012

    [Resolvido]Validar Horas em caixa de texto Empty Re: [Resolvido]Validar Horas em caixa de texto

    Mensagem  Leticia.*-* 25/1/2013, 23:47

    Valeu Funcionou !

    Bom final de semama a todos! Laughing
    avatar
    Convidado
    Convidado


    [Resolvido]Validar Horas em caixa de texto Empty Re: [Resolvido]Validar Horas em caixa de texto

    Mensagem  Convidado 25/1/2013, 23:55

    O Fórum agradece o Retorno.

    Conteúdo patrocinado


    [Resolvido]Validar Horas em caixa de texto Empty Re: [Resolvido]Validar Horas em caixa de texto

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 18:23