[Resolvido]Impedir o zero a esquerda

Mais uma ves estou aqui. rsrsrsrsrsrs

Tenho um campo chamdo Processo em que digito o Número do processo. O problema é que gostaria que esse campo não aceitasse número com zero a esquerda como 0001/10. Gostaria que ficasse apenas 1/10. Podem me ajudar?

Att,

Luciana

Tente colocar o formato do campo como "Número geral" com 0 casas decimais.

Não deu certo porque preciso da barra e o campo número não permite a barra.

Exemplo:

1/11

O número 1 representa o número do processo e o 11 é referente ao ano de 2011

Tente assim

Me.Processo = Left([Processo], 1)

Boa tarde,

Ou utilize o acontecimento ao sair do controlo e coloque o seguinte código:
TxtseuControlo=format(txtseucontrolo,"#")
Cumprimentos,

Tem tambem essa rotina que acabei de desenvolver:

Dim ContaZero As Long, Sobra As Long

ContaZero = 1

    Do
        If Mid(Me.SeuCampo, ContaZero, 1) = 0 Then
            ContaZero = ContaZero + 1
        End If
    Loop Until Mid(Me.SeuCampo, ContaZero, 1) <> 0

Sobra = Len(Me.SeuCampo) - ContaZero + 1
Me.SeuCampo = Mid(Me.SeuCampo, ContaZero, Sobra)

Se for um campo no qual irá digitar os números, coloque no evento "Após atualizar" do campo. Se for em um form que já será carregado com o campo preenchido, coloque no evento "Ao carregar" e/ou "Ao formatar" do formulário.

Desculpem a demora pela resposta. Só conseguir parar agora para mexer no bd.

Tentei a dica do Criquio e deu tudo certo. Digito um número começando com 0 e quando vou para o campo ao lado automaticamente o 0 se apaga. PERFEITO. TÓPICO RESOLVIDO.

Mas para não sair da rotina, já irei abrir outro. Rsrsrsrsrsrs

Abraços.

Só mais uma coisinha: tem algum limite de tópicos que podemos abrir?

Esteja à vontade e abra quantos quizer