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


2 participantes

    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999

    wesleyrob9
    avatar
    wesleyrob9
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 83
    Registrado : 08/02/2012
    • Mensagem nº1

    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Empty campo formulario preenchido automatico formato 0000/ano ou <9999999

    Mensagem  wesleyrob9 19/2/2012, 03:32

    If NUMERO < 9999 Then
    Me.documento = "Oficio"
    Else
    Me.documento = "Petição"
    End If

    da forma que esta ai emcima funciona , mas como fazer que ao inves de ter <9999 , dizer se o campo tiver alguma barra (/) o valor =oficio ex.120/2012 = oficio
    • Ir para o topo
    Marcelo David
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011
    • Mensagem nº2

    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Empty Re: [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999

    Mensagem  Marcelo David 19/2/2012, 04:32

    Boa madrugada!!
    Eis o código:

    Dim strProcura As String, intCriterio As Integer
    strProcura = "/"
    intCriterio = InStr(Me.txtTeste, strProcura)
    If intCriterio Then
    Me.documento = "Oficio"
    Else
    Me.documento = "Petição"
    End If



    .................................................................................
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Marcel11
    • Ir para o topo
    wesleyrob9
    avatar
    wesleyrob9
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 83
    Registrado : 08/02/2012
    • Mensagem nº3

    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Empty Re: [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999

    Mensagem  wesleyrob9 19/2/2012, 18:47

    obrigado a dica

    inserio a linha
    If Not IsNull(Me.NUMERO)
    no comeco, caso do valor ser nulo
    nao da erro ,e ficou do jeito que eu queria .
    valeu mesmo a galera do forum e demais.
    • Ir para o topo
    Marcelo David
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011
    • Mensagem nº4

    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Empty Re: [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999

    Mensagem  Marcelo David 20/2/2012, 00:21

    Obrigado pelo retorno, o fórum agradece!


    .................................................................................
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Marcel11
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº5

    [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999 Empty Re: [Resolvido]campo formulario preenchido automatico formato 0000/ano ou <9999999

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 8/11/2024, 06:51