txtbox visivel sobre um dado parametro

[ferreira12]

ola, queria que que a txt2 só ficasse visivel quando eu escrevesse na txt1 'site' ou 'loja', caso contrario devolve uma msgbox.

estou a utilizar o codigo abaixo mas nao estou a conseguir colocar da maneira que pertendo.

Private Sub txt1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles txt1.KeyPress

    txt2.Visible = False
    If e.KeyChar = vbCr Then

	    ' If txt2.Visible = True Then
	    txt1.Text = "site"
	    'End If
    End If
   End Sub

[nelsonr]

Algo assim?

Private Sub txt1_KeyUp(sender As Object, e As KeyEventArgs) Handles txt1.KeyUp
   If e.KeyCode = Keys.Enter Then
       If txt1.Text.ToLower() = "site" Or txt1.Text.ToLower() = "loja" Then
           txt2.Visible = True
       Else
           MessageBox.Show("errado")
       End If
   End If
End Sub

(coloca de inicio a txt2 com o visible=false)

Fiz o exemplo no keyup, mas podes seguir a mesma estrutura no keypress

Edited October 9, 2013 at 04:43 PM by nelsonr

[ferreira12]

Obrigado. problema resolvido....

[bids]

tao facil lol

[nelsonr]

tao facil lol

E qual o objectivo deste post?

[bids]

significa que era muito facil e eu nao sabia 🙂