Usuário com melhor resposta
Backcolor de textbox com condição

Pergunta
-
Ao digitar um CPF no textbox1, meu textbox2 busca a data de emissão de um exame no banco de dados e retorna a data acrescida de 365 dias que é a data de vencimento do exame, conforme condição abaixo:
If Me.txt_aso.Text <> "" Then Me.txt_aso.Text = format(DateAdd("D", 365, CDate(txt_aso.Text)), "dd/mm/yyyy")
minha dúvida é a seguinte: como formatar meu textbox2 para que ele fique com backcolor vermelho se a data que o textbox2 gerou for menor ou igual a data de hoje?
Respostas
-
O Textbox tem um evento chamado CHANGE, que é disparado sempre que é feita qualquer alteração nele.
Então você vai colocar no evento change do textbox um if testando se textbox = "", caso seja verdade você muda a propriedade backcolor.
- Marcado como Resposta Rodrigo Paschoalini quinta-feira, 15 de outubro de 2015 17:11
Todas as Respostas
-
If Me.textbox2 <= date Then Me.textbox2.backcolor = vbred end if
- Sugerido como Resposta André Santo quarta-feira, 14 de outubro de 2015 20:34
-
-
O Textbox tem um evento chamado CHANGE, que é disparado sempre que é feita qualquer alteração nele.
Então você vai colocar no evento change do textbox um if testando se textbox = "", caso seja verdade você muda a propriedade backcolor.
- Marcado como Resposta Rodrigo Paschoalini quinta-feira, 15 de outubro de 2015 17:11