CassioFabre 7/12/2016, 10:37
Bom dia,
Amigo, acredito que a forma mais simples de você conseguir fazer isso seja:
Percebi que na tbl_Prioridades, que acredito ser de onde você tira os valores que preenche o campo grauprioridade, voce possui um campo chamado id_Prior. Penso que você poderia incluir na consulta este campo e fazer o tratamento do seu formulário a partir deste campo na tabela. Por exemplo criando um função:
- Código:
Public Function grauPrioridade()
Dim intPrioridade As Integer
intPrioridade = DLookup("idPrioridade", "cns_Folha_Serviço", "[criterios]")
grauPrioridade = DLookup("[campo com o valor que quer que apareça no campo prazo]", "tbl_Prioridades", "id_Prior = " & intPrioridade & "")
End Function
Dessa forma, caso queira acrescentar outros graus de prioridade, basta fazer isso na tabela, não precisará acrescentar nem uma linha de código posteriormente.
Aí no ponto que voce queira que o campo prazo seja alterado/preenchido (com um botão, a partir da atualização de outro campo, de acordo com a sua necessidade), voce coloca:
- Código:
txtPrazo = grauPrioridade
Penso que seja de fato a forma mais simples de fazer o que ta precisando.
Abraço.