[VB.NET] d'une chaine vers une instruction

Dim Boucle As Int32 = 0
Dim NomCtrl As String = String.Empty

For Boucle = 1 To 3
	NomCtrl = String.Format("{0}{1}", "tbx_Item", Boucle)
	ChangeValeurTextBox(NomCtrl, (Boucle * 10).ToString)
Next

Private Sub ChangeValeurTextBox(ByVal pNom As String, ByVal pValeur As String)

	Dim Ctrl As System.Windows.Forms.Control

	For Each Ctrl In Me.Controls
		If Ctrl.GetType Is GetType(TextBox) Then
			If (Ctrl.Name = pNom) Then
				Ctrl.Text = pValeur
			End If
		End If
	Next

End Sub

    Public Sub setLabel(ByVal name As String, ByVal value As String)  
        Dim Lb As Control  
        For Each Lb In Me.Controls  
            If Lb.Name = name Then Lb.Text = value : Exit Sub  
        Next  
    End Sub