ajouter dynamiquement un groupe de textbox pour des calcul Résolu/Fermé

Question

Bonjour, a tous

        voila je c que c dit plusieurs fois mais dans mon cas sous vb.net 2010 express je veux créer plusieurs textbox dynamiquement qui seront liées par  plusieurs formule de calcul.

         y'aurait il par hasard une façon plus simple pour parcourir une marge des textbox  par exemple  en les spécifiant par leur noms ou autre chose .. etc

        " sinon de mon coté j ai essayé avec un code qui créé des textbox  tout en leur ajoutant un compteur a leur propriété Name mais lorsque je veux les parcourir j en sais pas trop comment faire"

                        merci d'avance les pro de prendre le Temp de comprendre mon problème

Utilisateur anonyme · Answer

Bonjour,

que veux tu dire par pour parcourir une marge des textbox  ?

cs_Le Pivert · Answer

Bonjour,

Mettre un panel et 2 buttons avec ce code:


Option Strict On
Public Class Form1
    Dim Txt As TextBox
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim Top, Left, Width, Height As Integer
        Dim NumeroTextBox As Integer
        Top = 10
        Left = 10
        Width = 100
        Height = 20
        NumeroTextBox = 1
        For i = 0 To 4 - 1
            Txt = New TextBox()
            With Txt
                .Visible = True
                .Top = Top 'Definit la distance entre le bord de la fenetre et le bord du conteneur 
                .Left = Left 'Definit la distance entre le bord gauche de la fenetre et le bord du conteneur 
                .Width = Width 'Definit la largeur de l'objet 
                .Height = Height 'Definit la hauteur de l'objet 
            End With
            Panel1.Controls.Add(Txt)
            Top = Top + 30
            NumeroTextBox = NumeroTextBox + 1
        Next
    End Sub
    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        Dim ctrl As Control
        For Each ctrl In Panel1.Controls

If (ctrl.GetType() Is GetType(TextBox)) Then
                Dim txt As TextBox = CType(ctrl, TextBox)
                MsgBox(txt.TabIndex)
            End If
        Next
    End Sub

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Button1.Text = "Creer"
        Button2.Text = "Index"
    End Sub
End Class

amistos · Answer

bonjour , cs_Le Pivert

d'abord merci pour la rapidité de votre reponse.

pour le code qui genere les textbox  avec les proprieté left top etc...  je l ai deja dans mon code par contre je croi que la solution a mon problem c la partie ou ta utilisé la "tabindex" si possible quelque explication sur comment  on peut utilisé la  "tabindex" ou l index  du controle en general pour traiter  une collection des Tbox et merci encore !!

Utilisateur anonyme · Answer

Bonsoir,
Tabindex n'est pas un index pour retrouver un contrôle.
C'est ce qui détermine l'ordre de déplacement du focus avec la touche Tabulation.

Si tu veux pouvoir récuperer tes objets, au moment ou tu les gères mets les dans une liste.
Tu peux aussi mettre un index ou un identificateur dans la propriété Tag.

--

Ajouter dynamiquement un groupe de textbox pour des calcul

4 réponses

Discussions similaires