Bonjour,

Voici le programme qui me permet de réinitialiser mes textbox et de mémoriser les valeurs qui étaient à l'intérieur avant la réinitialisation:

Dim numEntreeStructure As Integer = 0

    Structure Branche
        Dim mSurface As String
        Dim mLongueur As String
        Dim mCoefImp As String
        Dim mPente As String
    End Structure

    Dim tBranche() As Branche

    Private Sub ViderMesTextBox()

        Dim ctl As Control

        For Each ctl In Me.Controls
            Select Case TypeName(ctl)
                Case "TextBox"
                    ctl.Text = ""
            End Select
        Next ctl

    End Sub


    Private Sub ButSuivant_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButSuivant.Click
        ReDim Preserve tBranche(numEntreeStructure)
        tBranche(numEntreeStructure).mSurface = TXB_surface.Text
        tBranche(numEntreeStructure).mLongueur = TXB_longueur.Text
        tBranche(numEntreeStructure).mCoefImp = TXB_CoefImp.Text
        tBranche(numEntreeStructure).mPente = TXB_pente.Text
        numEntreeStructure = numEntreeStructure + 1
        ViderMesTextBox()
    End Sub

Maintenant j'aimerais savoir comment les réutiliser une fois que mes textbox sont réinitialisées. Je ne vois pas du tout comment faire. Faut-il les appeler comme de simples fonctions?

Pouvez-vous m'aider?

Merci.