Bonjour,

En espérant avoir posté au bon endroit ma demande, car je débute avec cette application...c'est une première pour moi....
J'ai créer un modèle VB (Application Windows Forms).

Mes deux questions :

J'ai un textbox et je tente cette procédure...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
   If Not (IsNumeric(TextBox1.Text)) Then
            Label_erreur.Text = "Vous devez taper une valeur numérique..."
            Exit Sub
        End If
Là, tout va bien.
Mais j'aimerais ajouter jusqu'à 4 zéros automatiquement devant (si il n'y a qu'un chiffre), je m'explique...
Dans ACCCESS je faisait :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
Text = Format(Me.Txt, "00###")
En VB.NET ça ne fonctionne pas, j'ai regardé sur le Net et j'ai trouvé ceci :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
        'remplit une valeur entière avec cinq zéros non significatifs.
        Dim value As Integer = TextBox1.Text
        Dim decimalLength As Integer = value.ToString("D").Length + 5
        Dim hexLength As Integer = value.ToString("X").Length + 5
        Console.WriteLine(value.ToString("D" + decimalLength.ToString()))
        Console.WriteLine(value.ToString("X" + hexLength.ToString()))
 
 MsgBox(TextBox1.Text)
Mais, aucun résultat....comment gérer ma TextBox dans ce cas ?

Ma deuxième question concerne une ListBox, une fois les données affichées, comment ouvrir le document choisi à l'aide d'un double clic ?

Dans l'attente merci..