COMO FECHAR TELA?
Pessoal, boa tarde.
Sou novo neste [Ô]ramo[Ô] do visual studio. Estou tentando implementar um código no qual a tela form1 tem que fechar assim que a condição seja ok, só que está dando erro. Segue abaixo o codigo:
If txtLogin.Text = [Ô][Ô] Or txtSenha.Text = [Ô][Ô] Then
MsgBox([Ô]Favor digitar o login e/ou senha corretamente![Ô], vbOKOnly)
Else
Unload Me
Form2.Show()
End If
Como eu faço?
Desde já agradeço.
Sou novo neste [Ô]ramo[Ô] do visual studio. Estou tentando implementar um código no qual a tela form1 tem que fechar assim que a condição seja ok, só que está dando erro. Segue abaixo o codigo:
If txtLogin.Text = [Ô][Ô] Or txtSenha.Text = [Ô][Ô] Then
MsgBox([Ô]Favor digitar o login e/ou senha corretamente![Ô], vbOKOnly)
Else
Unload Me
Form2.Show()
End If
Como eu faço?
Desde já agradeço.
Inverta a ordem dos comandos pra ver:
If txtLogin.Text = [Ô][Ô] Or txtSenha.Text = [Ô][Ô] Then
MsgBox([Ô]Favor digitar o login e/ou senha corretamente![Ô], vbOKOnly)
Else
Form2.Show()
[txt-color=#e80000]Unload Me[/txt-color]
End If
Quanto a mensagem existe tipos diferentes que pode ser feito,mas este não funciona.
If txtlogin.Text = [Ô][Ô] Or txtsenha.Text = [Ô][Ô] Then
MsgBox ([Ô]Favor digitar o login e/ou senha corretamente![Ô])
Else
Form2.Show
Unload Me
End If
O mais correto é usar o Trim.
Fica assim.
If Trim(txtlogin.Text) = [Ô][Ô] Or Trim(txtsenha.Text) = [Ô][Ô] Then
Evita dor de cabeça.
If txtlogin.Text = [Ô][Ô] Or txtsenha.Text = [Ô][Ô] Then
MsgBox ([Ô]Favor digitar o login e/ou senha corretamente![Ô])
Else
Form2.Show
Unload Me
End If
O mais correto é usar o Trim.
Fica assim.
If Trim(txtlogin.Text) = [Ô][Ô] Or Trim(txtsenha.Text) = [Ô][Ô] Then
Evita dor de cabeça.
Citação::
Inverta a ordem dos comandos pra ver:If txtLogin.Text = [Ô][Ô] Or txtSenha.Text = [Ô][Ô] Then
MsgBox([Ô]Favor digitar o login e/ou senha corretamente![Ô], vbOKOnly)
Else
Form2.Show()
[txt-color=#e80000]Unload Me[/txt-color]
End If
Cara,
Havia colocado antes e não deu certo. Coloquei agora novamente e continua não dando certo. Segue print para visualização.
Citação::
Inverta a ordem dos comandos pra ver:If txtLogin.Text = [Ô][Ô] Or txtSenha.Text = [Ô][Ô] Then
MsgBox([Ô]Favor digitar o login e/ou senha corretamente![Ô], vbOKOnly)
Else
Form2.Show()
[txt-color=#e80000]Unload Me[/txt-color]
End If
Aborta a mensagem anterior!!
Havia colocado antes e não deu certo. Coloquei agora novamente e continua não dando certo. Segue print para visualização.
Experimenta isso:
If txtLogin.Text = [Ô][Ô] Or txtSenha.Text = [Ô][Ô] Then
MsgBox([Ô]Favor digitar o login e/ou senha corretamente![Ô], vbOKOnly)
Else
Form2.Show()
Me.Dispose()
Me.Close()
End If
If txtLogin.Text = [Ô][Ô] Or txtSenha.Text = [Ô][Ô] Then
MsgBox([Ô]Favor digitar o login e/ou senha corretamente![Ô], vbOKOnly)
Else
Form2.Show()
Me.Dispose()
Me.Close()
End If
Citação::
Quanto a mensagem existe tipos diferentes que pode ser feito,mas este não funciona.
If txtlogin.Text = [Ô][Ô] Or txtsenha.Text = [Ô][Ô] Then
MsgBox ([Ô]Favor digitar o login e/ou senha corretamente![Ô])
Else
Form2.Show
Unload Me
End If
O mais correto é usar o Trim.
Fica assim.
If Trim(txtlogin.Text) = [Ô][Ô] Or Trim(txtsenha.Text) = [Ô][Ô] Then
Evita dor de cabeça.
Omar,
Coloquei a cláusula TRIM. Valeu pela dica.
Tu postou no local errado.
Este é vb/vba.
Tinha que ser Vbnet.
Este é vb/vba.
Tinha que ser Vbnet.
Citação::
Tu postou no local errado.
Este é vb/vba.
Tinha que ser Vbnet.
Ok Omar,
Irei postar no local correto. Obrigado.
Tópico encerrado , respostas não são mais permitidas