Question : commande de format basée sur passer le nom de forme et de commande

Plutôt que changeant la couleur de fond dans chaque événement d'entrée et de sortie pour une forme 2003 de base de données d'ACCÈS, je voudrais créer une fonction qui fait ceci ainsi si je veux changer les couleurs, je seulement doivent le faire placent dedans une fois.  Cependant, quand j'essaye de passer le nom de la forme, l'un ou l'autre comme corde pour le nom de forme, j'obtenir les erreurs telles que la variable non avouée ou le datatype mismatched. class= > " clair " de
> de " codeSnippet " de class= de
class= " lineNumbers " de
class= de 
1 :
2 :
3 :
4 :
5 :
6 :
class= OnFocusColors secondaire >Public " notpretty " (frmName de l'id= " codeSnippet941957 " de
class= de

Réponse : commande de format basée sur passer le nom de forme et de commande

J'emploierais le déclenchement/mets des événements hors tension. Voir le code. Noter que j'ai changé les paramètres en cordes.

Lee


1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :

OnFocusColors secondaire public (frmName comme corde, ctlName comme corde)
    Formes (frmName). Commande (ctlName) .BackColor = vbRed
Sous-marin d'extrémité
LostFocusColors secondaire public (frmName comme corde, ctlName comme corde)
    Formes (frmName). Commande (ctlName) .BackColor = vbBlue
Sous-marin d'extrémité

Form_GotFocus secondaire privé ()
    Appel OnFocusColors (Me.Name, Text0.Name)
Sous-marin d'extrémité

Form_LostFocus secondaire privé ()
    Appel LostFocusColors (Me.Name, Text0.Name)
Sous-marin d'extrémité
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
    •
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
    •
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
    •
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
    •
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
    •
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
    •
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
    •
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
    •
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
    •
  •  Winzip 12 issues de secours du travail ?
    •
     
    programming4us programming4us