Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Evento Exit - SetFocus

Dicas dos mais variados tipos, necessidades, angústias, enfim
Avatar do usuário
Mauro Coutinho
Jedi
Jedi
Mensagens: 1561
Registrado em: Sáb Mar 13, 2010 8:10 pm
Localização: São José dos Pinhais - Pr

Evento Exit - SetFocus

Mensagem por Mauro Coutinho »

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
SetFocus Evento Exit.zip
(74.64 KiB) Baixado 2035 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Evento Exit - SetFocus

Mensagem por webmaster »

Salve Mauro,

Valeu pelo exemplo. Se importa se publicar no blog?


Avatar do usuário
Mauro Coutinho
Jedi
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

Mensagem por Mauro Coutinho »

webmaster escreveu:Salve Mauro,

Valeu pelo exemplo. Se importa se publicar no blog?
Salve Tomas, fique a vontade, é sempre uma honra ter publicações no Blog, nem precisava perguntar, rsrsrs.

abraços


Avatar do usuário
Mikel Silveira Fraga
Jedi
Jedi
Mensagens: 1173
Registrado em: Sex Mai 27, 2011 3:27 pm
Localização: Governador Valadares - MG
Contato:

Re: Evento Exit - SetFocus

Mensagem por Mikel Silveira Fraga »

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.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Mauro Coutinho
Jedi
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

Mensagem por Mauro Coutinho »

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


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder