Private Sub TextBox1_PreviewKeyDown(ByVal sender As Object, ByVal e As PreviewKeyDownEventArgs) Handles TextBox1.PreviewKeyDown If e.KeyCode = Keys.Tab Then e.IsInputKey = True End If End Sub
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.TabStop = False TextBox2.TabStop = False Button1.TabStop = False Button2.TabStop = False Button3.TabStop = False Me.Show() TextBox1.Focus() End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question