MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Segundo e terceiro valor em uma função de consulta

    avatar
    Kiora
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 52
    Registrado : 18/06/2016

    Segundo e terceiro valor em uma função de consulta Empty Segundo e terceiro valor em uma função de consulta

    Mensagem  Kiora em 28/7/2017, 17:35

    Ola pessoal,

    Tenho uma tabela tipo:
    Tabela: Cad
    ID | Nome | Idade
    1 Rau 10
    2 joão 10
    3 lui 10
    4 rita 15
    6 tof 13
    7 malu 15


    meu botão exibe em 2 TX o nome e a idade do mais velho com esse codigo:
    TXX começa no formulário como 0

    If TXX = 0 Then
    aux = DMax("[idade]", "cad") ->pega a maior idade na tabela

    IDAUX = DLookup("[ID]", "cad", "idade= " & aux & "") -> pega o id quando aux

    TXnome = DLookup("[nome]", "cad", "ID=" & idaux & "")
    TXidade = DLookup("[idade]", "cad", "ID=" & idaux& "")

    TXX = 1

    Else
    aux = DMax("[idade]", "cad","[idade] < " & TXIdade & "") ->pega a segunda maior idade na tabela

    IDAUX = DLookup("[ID]", "cad", "idade= " & aux & "") -> pega o id quando aux

    TXnome = DLookup("[nome]", "cad", "ID=" & idaux & "")
    TXidade = DLookup("[idade]", "cad", "ID=" & idaux& "")

    auX = DMAX("[Idade]","Cad","[idade] < " & TXIdade & ")
    end if

    porem meu botão so mostra os primeiro valores quando a idade for igual tipo

    rita 15
    tof 13
    rau 10


    COMO FAÇO PRA, cada vez que eu apertar o botão, APARECER NA ORDEM POR IDADE, sem pular ninguem?
    Tipo:
    rita 15
    malu 15
    tof 13
    rau 10
    joão 10
    lui 10

      Data/hora atual: 24/10/2020, 01:40