Páginas

sexta-feira, 30 de julho de 2010

Não permitir que campos sejam maiores que outros


Como não permitir que um campo seja maior que o outro. Ex: número de alunos freqüentes maior que o número de alunos matriculados. Neste caso tenho dois campos (alu_mat e alu_freq).

Acesse a propriedade do campo (alu_freq) e localize a linha após atualizar na aba evento e cole o código abaixo:

if me.ctlalu_freq > me.ctlalu_freq then
msgbox "Atenção! O número de de alunos frequentes não pode ser superior ao número de matriculados. Verifique!!", vbokonly
me.ctlalu_freq.value = ""
me.ctlalu_freq.setfocus
end if
end sub

Dica: Caso seu formulário seja para informar o número de alunos freqüentes durante o mês, dia a dia, basta fazer da seguinte forma:

Crie 31 campos, para cada dia do mês (ex: alu_freq1; alu_freq2; alu_freq3.........alu_freq31) e mais 31 para os matriculados (alu_mat1; alu_mat2; alu_mat3...... alu_mat31).

Agora cole o codigo acima nos 31 campos dos alunos frequentes.

Nenhum comentário:

Postar um comentário