Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Evento Exit - SetFocus
- Mauro Coutinho
- Jedi
- Mensagens: 1561
- Registrado em: Sáb Mar 13, 2010 8:10 pm
- Localização: São José dos Pinhais - Pr
Evento Exit - SetFocus
Tenho recebido algumas solicitações em PVT referente a Propriedade Setfocus, ou como dizem, evitar de sair de um controle se ele estiver em branco, e geralmente utilizam somente o Evento EXIT, só que dependendo da estrutura, cria-se o inconveniente de quando o controle estiver em branco e clicar em um Botão para fechar o Formulário recebemos a mensagem que o preenchimento é obrigatório, só que não queremos preenche-lo no momento e sim somente fechar o formulário.
Baseando-me nestas solicitações montei um modelo onde utilizo um Frame e uma Variável para anular a Propriedade Cancel do Evento Exit, e aproveitei para deixar o textbox com aceitação só de numeros/ datas e somente texto.
Com certeza existem outras formas, mas a que eu geralmente utilizo é esta, então segue para quem precisar.
Userfom Eventos Exit - KeyPres - Change
Userform sem o "X" para fechar o formulário.
Controles somente Datas e Textos
Baseando-me nestas solicitações montei um modelo onde utilizo um Frame e uma Variável para anular a Propriedade Cancel do Evento Exit, e aproveitei para deixar o textbox com aceitação só de numeros/ datas e somente texto.
Com certeza existem outras formas, mas a que eu geralmente utilizo é esta, então segue para quem precisar.
Userfom Eventos Exit - KeyPres - Change
Userform sem o "X" para fechar o formulário.
Controles somente Datas e Textos
- Mauro Coutinho
- Jedi
- Mensagens: 1561
- Registrado em: Sáb Mar 13, 2010 8:10 pm
- Localização: São José dos Pinhais - Pr
Re: Evento Exit - SetFocus
Salve Tomas, fique a vontade, é sempre uma honra ter publicações no Blog, nem precisava perguntar, rsrsrs.webmaster escreveu:Salve Mauro,
Valeu pelo exemplo. Se importa se publicar no blog?
abraços
- Mikel Silveira Fraga
- Jedi
- Mensagens: 1173
- Registrado em: Sex Mai 27, 2011 3:27 pm
- Localização: Governador Valadares - MG
- Contato:
Re: Evento Exit - SetFocus
Mauro Coutinho, bom dia.
Sempre um prazer poder ver mais um de seus incríveis modelos.
Quando entrei no fórum, entre 2010/2011, ficava admirado com seus trabalhos e digo, com todo o prazer, que eles foram parte das inspirações que sempre me motivaram a querer aprender mais.
Excelente trabalho e forte abraço.
Sempre um prazer poder ver mais um de seus incríveis modelos.
Quando entrei no fórum, entre 2010/2011, ficava admirado com seus trabalhos e digo, com todo o prazer, que eles foram parte das inspirações que sempre me motivaram a querer aprender mais.
Excelente trabalho e forte abraço.
- Mauro Coutinho
- Jedi
- Mensagens: 1561
- Registrado em: Sáb Mar 13, 2010 8:10 pm
- Localização: São José dos Pinhais - Pr
Re: Evento Exit - SetFocus
Mikel Silveira Fraga, agradeço a consideração e fico lisonjeado, mas ainda estou longe de ser um expert, mas sempre procuro fazer da melhor maneira possível.
Já cheguei a ver vários exemplos seu e muitos estão guardados com carinho em minha biblioteca, sucesso pra você.
[]s
Já cheguei a ver vários exemplos seu e muitos estão guardados com carinho em minha biblioteca, sucesso pra você.
[]s