TextChanged
If e.Sender.Text = "A" Then
e.Form.Controls("Button1").Visible = True
Else
e.Form.Controls("Button1").Visible = False
End If