Modifier une propriétée dans tous les textboxRésolu

Question

Bonjour à tous j'aimerai dans un code modifier plusieur propriétées de tous les textbox d'une form sans réécrire la même chose à chaque fois.
Voici mon code :

  For Each TB As TextBox In Form1.Controls
            TB.ReadOnly = False
        Next TB

Et j'ai se messge d'erreur au moment de l'execution du code : "Impossible d'effectuer un cast d'un objet de type 'System.Windows.Forms.Panel' en type 'System.Windows.Forms.TextBox'.".

J'ai aussi éssayé de métre tous les textbix dans un panel et de metre "In Form1.Panel9.Controls" mais il y a aussi eu l'erreur.

Je 'arrive pas à trouver de solution, j'espre que quelqu'un a la solution à mon probleme.
Merci d'avance à ceux qui me repondront.

cs_casy · Accepted Answer

For Each TB As Control In Me.Controls
            If TypeOf (TB) Is TextBox Then
                CType(TB, TextBox).ReadOnly =   False
            End If
        Next

  ---- Sevyc64  (alias Casy) ----  <hr size  ="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

damienpasqualinotto · Answer

Merci beaucoup c'est cool.
J'avais deja éssayé ça mais sans le "CType" donc ça ne fonctionais pas.
Merci encore.

Modifier une propriétée dans tous les textbox

2 réponses

Votre réponse

Discussions similaires