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

    Dúvida - Caixa de listagem para campos da tabela

    avatar
    rharisonluca
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 20/12/2016

    Dúvida - Caixa de listagem para campos da tabela Empty Dúvida - Caixa de listagem para campos da tabela

    Mensagem  rharisonluca 3/1/2017, 23:17

    Boa Noite.

    Estou desenvolvendo um sistema, e me deparei com um probleminha. O sistema é de gerenciamento de manutenções, e no formulário onde se cadastra as manutenções é necessário colocar o KM ou Milha ou Tempo (Horímetro) do equipamento.

    Tenho 3 campos na tabela (KM, MILHA E TEMPO), seria possível criar uma caixa de seleção para o  usuário selecionar o campo que será cadastrado ?
    CassioFabre
    CassioFabre
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 18/01/2013

    Dúvida - Caixa de listagem para campos da tabela Empty Dúvida - Caixa de listagem para campos da tabela

    Mensagem  CassioFabre 12/1/2017, 11:41

    Bom dia,

    Sim, é possível. Crie uma combo. Em propriedades dessa combo, na aba Dados campo "Tipo de Origem de Linha" coloque Lista de valores. no campo Origem de Linha coloque: "KM";"MILHA";"TEMPO". Também coloque um campo para o usuário digitar o valor. Vou chamar aqui de txtCampo.

    Quando for salvar os dados se estiver utilizando recordset, coloque no trecho correspondente:

    Código:
    If suaCombo = "KM" then
        rs("KM") = txtCampo
    Elseif suaCombo = "MILHA" then
        rs("MILHA") = txtCampo
    else
        rs("TEMPO") = txtCampo
    end if

    Estou enviando em anexo um exemplo para voce entender melhor. Mas não é complexo e voce vai tirar de letra.

    Abraço.
    Anexos
    Dúvida - Caixa de listagem para campos da tabela Attachmentexemplo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (15 Kb) Baixado 16 vez(es)

      Data/hora atual: 28/3/2024, 17:58