3/2/11

On textbox key down /focus help shd open

Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown If e.KeyCode = Keys.F1 Then Panel1.Visible = True TextBox1.Enabled = False TextBox2.Focus() End If End Sub Private Sub TextBox2_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox2.Leave If TextBox2.Text <> "" Then Panel1.Visible = False TextBox1.Enabled = True TextBox1.Text = TextBox2.Text End If End Sub