Bonjour,

J'ai une erreur dans ce code que je n'arrive pas à résoudre.
L'objectif est de charger une valeur à un TEXTBOX dont le name commence par "t_".
j'ai environ 40 textbox qui par ce biais devrait être alimentés automatiquement.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 Dim DS As New DataSet
        DS = GetIvec31()
        Try
            For i As Integer = 0 To DS.Tables(0).Rows.Count - 1
                Dim mJL As String = DS.Tables(0).Rows(i).Item("JL")
                Dim mQ As String = DS.Tables(0).Rows(i).Item("QTOT").ToString
                Dim t As TextBox = CType(Me.Controls("t_" & mJL), TextBox)
                t.Text = mQ
 
            Next (i)
 
        Catch ex As Exception
            MsgBox(ex.Message)
 
        End Try
Comme vous le voyez, mes données proviennent d'un DataSet.
JL est l'extention du nom du textbox (ex : t_CI, t_ML, t_FU, etc...).
QTOT est un INTEGER et cette valeur sera attribuée au TEXT du Textbox.

Cela fonctionne pour le premier de la liste mais ensuite c'est plante...

Avez vous une idée ?
Merci