Usuário com melhor resposta
Checar informações antes de fechar um form iniciado em modo diálogo

Pergunta
-
Boa tarde, pessoal!
Eu tenho um form, com um botão configurado como DialogResult.OK, iniciado em modo diálogo (ShowDialog) da seguinte maneira:
If FormDialogoPropriedades.ShowDialog = DialogResult.OK Then 'Código a ser executado para manipular as informações obtidas do FormDialogoPropriedades End If
Dentro do meu form eu tenho alguns textboxs que precisam ser preenchidos pelo usuário para terem as informações manipuladas no código a cima. Eu preciso que ao clicar no botão Ok seja verificado se o usuário preencheu as informações necessárias. Caso não tenha preenchido eu preciso que, após emitir uma mensagem de informação ao usuário, o form não seja fechado, mas continue aberto até que ele preencha as informações. Eu tentei da seguinte maneira, mas sem sucesso:
Private Sub Ok_Click(sender As Object, e As EventArgs) Handles Ok.Click If UsarSenha.Checked Then If Senha.Text <> String.Empty Or ConfirmarSenha.Text = String.Empty Then MsgBox("Confirme a senha do projeto!", MsgBoxStyle.Exclamation, Me.Text) ConfirmarSenha.Focus() Exit Sub ElseIf Senha.Text <> ConfirmarSenha.Text Then MsgBox("As senhas não conferem!", MsgBoxStyle.Exclamation, Me.Text) Senha.Focus() Exit Sub End If End If ProjetoAtual.ProjectName = Projeto.Text ProjetoAtual.CustomerName = Cliente.Text ProjetoAtual.Password = Senha.Text Me.Close() End Sub
Alguém poderia me ajudar?
Respostas
-
Voce tem de ciar um loop...
dim numerodebotao as int = numerodebotao;
loop
se existe botao fica no loop
se nao sai do loop
A flower cannot blossom without sunshine, and man cannot live without love.
- Marcado como Resposta Filipe B CastroModerator segunda-feira, 25 de setembro de 2017 13:46
Todas as Respostas
-
Boa tarde, EricJhon92. Tudo bem?
Obrigado por usar o fórum MSDN.
Essa seria uma questão de "How to/Customização" ou "Break Fix/Erro"?
Atenciosamente,
Filipe B de Castro
Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita
MSDN Community Support
Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.
-
Voce tem de ciar um loop...
dim numerodebotao as int = numerodebotao;
loop
se existe botao fica no loop
se nao sai do loop
A flower cannot blossom without sunshine, and man cannot live without love.
- Marcado como Resposta Filipe B CastroModerator segunda-feira, 25 de setembro de 2017 13:46
-
Bom dia,
Por falta de retorno essa thread está encerrada.
Se necessário, favor abrir uma nova thread.
Atenciosamente,Filipe B de Castro
Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita
MSDN Community Support
Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.