none
Atteindre un contrôle indirectement EXPRESS 2013 RRS feed

  • Question

  • Bonjour

    je voudrais lire la valeur de 48 contrôles dans un formulaire

    le code ci-dessous fonctionne dans un formulaire Access en VBA.  J'accède au contrôle avec Me(sNctl)

    For I = 0 To 47
        sNctl = "_" & Format(I * 1 / 48, "hhnn") & "TextBox"   'nom de la zone de texte
        J = CDbl(CDate(Format(I * 1 / 48, "hh:nn")).ToOADate) / CDbl(dtEcart.ToOADate)
        sgG(0, J) = Me(sNctl)
    

    À vous lire

    Blaise

    lundi 27 janvier 2014 17:06

Réponses

  • Bonjour,

    Si vos contrôles sont nommés pareil, vous pouvez appliquez la même logique sur votre fenêtre Windows :

    sgG(0, J) = Me.Controls.Item(sNctl).Text

    Me.Controls permettant d'accéder aux contrôles présents dans le formulaire, et vous pouvez y accéder via un indice (qui part de 0) ou via le nom.

    Cordialement


    Gilles TOURREAU - MVP C#
    Architecte logiciel/Consultant/Formateur Freelance - P.O.S Informatique
    Blog : http://gilles.tourreau.fr - Suivez-moi sur Twitter
    - MCPD : Enterprise Developper / Windows Developper 3.5 / ASP .NET 3.5/4.0
    - MCSA : SQL Server 2012
    - MCITP : SQL Server 2008 Developper
    - MCTS : ADO .NET 3.5 / SQL Server 2008 Developper / Windows Forms 3.5 / ASP .NET 3.5/4.0 / TFS 2010 / Windows Azure

    • Proposé comme réponse Aurel Bera mardi 28 janvier 2014 07:22
    • Marqué comme réponse blaise032 mardi 28 janvier 2014 08:00
    lundi 27 janvier 2014 23:15
    Modérateur