Discussion :

[Muabdiba]

Bonjour,
J'utilise un TabControl avec plusieurs TabPages.
Dans une de ces TabPages, j'ai une TextBox dans laquelle je veux que l'on saisisse un Single. (Je ne souhaite pas utiliser de MaskedTextBox. Je trouve l'utilisation trop pénible pour les utilisateurs)

Mon souci est de tester la validité de la chaine saisie :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
    Private Sub tb_hp_LostFocus(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tb_hp.LostFocus
        Try
            Me.tb_hp.Text = Me.tb_hp.Text.Replace(".", ",")
            Dim s As Single = CSng(Me.tb_hp.Text)
        Catch
            Me.tb_hp.Focus()
        End Try
    End Sub

Ce qui fonctionne parfaitement. Mais uniquement pour un changement de Control interne à l'onglet hors bouton. Cela n'empêche pas de perdre réellement le focus en changeant d'onglet ou en cliquant sur un bouton.

Si quelqu'un a une idée ... merci

[mactwist69]

Salut !

En fait ton textbox, tu l'utilises comme un mot de passe ? Parce que MasquedTextbox sert surtout a caché les caractères... Pratique pour les mots de passe quand même.

Bon sinon, pour ton problème, ce que tu peux faire c'est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 Private Sub TabControl1_Selecting(ByVal sender As Object, ByVal e As System.Windows.Forms.TabControlCancelEventArgs) Handles TabControl1.Selecting
 
        If MotDePassePasOk() = False Then
            e.Cancel = True
        End If
 
    End Sub

ou MotDePassePasOk() c'est une fonction booleene ou tu peux mettre ton code. Ca empeche le changement d'onglet

[Muabdiba]

Non, je m'en sers pour récupérer un nombre non formaté.

Je n'avais pas vu l'événement Selecting. J'avais bien fait avec des "Select...ed", mais les tests étaient trop tard aussi.

Extra, merci ! ça fonctionne nickel.